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L'ORIC ATMOS PËRITEI 

L 


Un appareil compact et performant, doté de 64K Octets de mémoire 
vive, d'un Basic puissant (graphisme haute résolution. 8 couleurs, effets 
sonores) et d’un clavier mécanique complet. Sa sortie Péritel est mainte¬ 
nant auto-alimentée. Il dispose d’une gamme importante et variée de logi¬ 
ciels en français, et peut recevoir de nombreux périphériques pour con¬ 
venir à l’apprentissage, la programmation, le jeu et à un certain nombre 
d’applications semi-professionnelles. 

L'ATMOS est livré avec 2 cassettes de jeux, une cas f <T< 

sette de démonstration, son cable Péritel et son J 

manuel d'utilisation en français. 


Enfin un vrai disque pour l'ORIC ! 


Ce périphérique-roi manquait vraiment à l'ATMOS et à l'ORIC 1 pour leur 
donner accès à des applications de type professionnel. Une unité de disque, 
c'est avant tout une mécanique, ici une unité de disquette 3 pouces et une 
électronique pour le controleur, fabriqué dans l’usine de Normandie. Un lec¬ 
teur de disquettes enfin n'est rien sans un DOS (Système d'Exploitation du 
disque). SEDORIC est carrément génial. Jugez plutôt : 

Rapidité maximum (2,3 secondes pour charger ou sauvegarder 32K !), 
accès séquentiel et direct. 90 instructions com¬ 
prenant les commandes du DOS. un Basic 
étendu et des aides à la programmation, tou 
ches de fonction etc.. II demeure d'une extreme 
facilité d'emploi. 


SEDORIC ? génial ! ^ 




Périphériques et Accessoires : |— 


Moniteur couleurs spécial OR 14 

2750 F 

Imprimante MCP 40 plotter 4 couleurs 

990 F 


Moniteur monochrome vert HR 12" 

1150 F 

Câble pour impnmante palallèle 

150 F 


CaWe pour moniteur monochrome 

90F 

Rouleau de papier de rechange pour impr 

18 F 


Modulateur Noir & Blanc UHF 

295F 

Jeu Je stylos de lechange 

40F 


Modulateur couleurs UHF 

495 F 

Interface pour toystick programmable 

350 F 


Magnétophone â cassettes 

350F 

Joystick type Quickshot 1" 

95F 


Kit ORIC 1 — ATMOS : disponible 1 _ 


Ce Kit permet aux possesseurs d’ORIC 1 de transformer leur 
ordinateur partiellement (clavier seulement) ou totalement 
(clavier + ROM) en ATMOS. La transformation ne demande 
aucune soudure ni outillage spécial. Le kit comprend : 

Un boitier ATMOS complet avec clavier 
mécanique, une ROM 1 1 ATMOS un 
connecteur de clavier, un manuel ATMOS 
et un emballage d'origine complet. 1 1 


ORIC ATMOS : L'ordinateur pour apprendre 


Langages : 


Educatifs : 


Dessin : 


et les jeux... 


Basic Français. 

. . 150 

Conjugaisons . 

. 100 

D A O . 

... 100 

Cobra pinball . 

. . . 140 

Cours de Basic . 

150 

Planète bleue (Géogr.) . 

. 120 

ORIGRAPHE . 

290 

Meurtre à grande 


Compilateur LM 

. . 172 

CALORIC (diététique) 

100 

J'apprend la CAO 

180 

vitesse . 

. . 180 

J’apprends le Forth . . . 

. . 172 

Calcul Mental. 

120 

Images . 


1815 (Wargame) . . . . 

160 

LOGO . 

. . 150 

Course aux lettres . 

95 

VORTEXTE (trait.texte) .240 F 

Super Jeep. 

. 120 

Assembleur. 

. 260 

J'apprends l'anglais . . . 

. 140 

Musique : 


Scuba Dive. 

. . . 80 

Moniteur 1.0. 

. . 140 

TIC TAC . 

120 

Editeur musical. 

. . . 95 

Green Cross Toad . . . 

. . . 85 


| La politique ORiC ; prix, qualité/ services 


PRIX : 

Le nouveau prix de l'ATMOS a de quoi surpren¬ 
dre : il le place directement hors de portée de 
tous ses concurrents du moment. Ce prix n'est 
ni une promotion, ni un prix de braderie ou de 
liquidation : c'est le nouveau prix de l'ORIC 
ATMOS. du aux conditions de la reprise, et à 
l'excellente compétivité de la nouvelle équipe 


QUALITE : 

La nouvelle chaine de fabrication en Norman¬ 
die a sorti ses premiers ATMOS dotés d'amé¬ 
liorations techniques. Une procédure très stricte 
de contrôle-qualité a été mise en place : des tests 
sévères à tous les stades de l'assemblage et en 
fin de chaine assurent une fiabilité impeccable 


SERVICES : 

Enfin. EUREKA assortit sa nouvelle cam¬ 
pagne d’une politique de services et d'in¬ 
formation pour les revendeurs et les utili¬ 
sateurs. Un serveur Minitel est déjà en 
place, et des détails vous seront bientôt 
communiqués sur tout ce que vous pour¬ 
rez obtenir. 








































































EDITORIAL 


Déjà décembre ! C'est à cette même époque que, 
l'année dernière, nous décidions de transformer 
THEORIC en mensuel. Nous espérons que les 
numéros parus vous auront satisfaits à 100 %. 
Votre courrier nous engage à continuer dans 
cette même voie, pour vous apporter chaque 
mois davantage d'idées afin de mieux utiliser vos 
machines. 

Nous ne doutons pas que le Père Noël, dans 
sa grande générosité, apportera beaucoup 
d'ATMOS car, à moins de 1000 F, notre machine 
préférée reste la meilleure. 

Joyeux Noël à tous donc, et que ceux d'entre 
vous qui sont en vacances en profitent pour 
fignoler les programmes qu'ils enverront prochai¬ 
nement à THEORIC. 


GÉNIAL ! le MICROSERVEUR 
pour VOTRE ATMOS... 


MS ATMOS 800 F • fonctionne avec 
Jasmin ou Microdisc, 
via DTL 2000 + 

également disponible 

L'émulateur de Minitel en 2 versions 
JASMITEL (disquette) 490 F 
(pour Jasmin et Microdisc) 
MULTITEL (cassette) 190 F 
INFORMEZ-VOUS 

90.95.20.04 

IN Bureau d'études 

13440 CABANNES 


COMMANDE ANCIENS NUMEROS 
(valable jusqu'à épuisement des stocks) 


Numéro 3 . 20 F pièce 

Numéros suivants.30 F pièce 

Numéro 11 (Hors Série).25 F pièce 


ATTENTION : NUMERO(S) EPUISE(S) : 1 - 2 - 5-8 

NOM .Prénom . 

Adresse . 

Code Postal .Ville . 

Frais de port : 6,50 F jusqu'à 2 exemplaires 

9,50 F jusqu'à 4 exemplaires 
13,50 F jusqu'à 6 exemplaires 

Ci-joint, chèque bancaire ou postal de F. 
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La couverture de THEORIC a été 
réalisée d'après un dessin de 
Yannick BOURREE. 
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Courrier . 

Vitrine du logiciel . 

Essai imprimante MT 80S . 

Spirographe . 

FORTH . 

TRON . 

Ouvrez les fenêtres (fin ). . . 
Essai carte 256 couleurs . . 

Bytes . 

Editeur de Secteurs . 

Colditz . 

Musicoric ... 

Carie interface série . 

Les pieds dans le plat . . . . 

Moteur à 4 temps. 

Redéfinition EASYTEXT . . . 
Petites annonces. 

ABONNEMENT . 

COMMANDE DISQUETTES 
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MICROGEO I 

b*in* c'est quoi V boqota ... c J est ou ? Les heuriuit possesseurs 
a ukil i et minus sont sauves : us ne feront jamais partie oe cette majorité oe 
français qui, ait-on, est nulle en aeooarpnie. 

HLHUbtu est un erearamme educatif qui rendra attrayant l'apprentissage ns 
la geoqraome. 

CASSETTE 

i jeux vnus permettent a associer pays et capitales, cans un teios mite 
choisi au deeut ou <eu. sur oes cartes qrapniques en couleur, vous pourrez 
mémoriser leur emoiacement dans le monoe qrace a un avion gui se posera sur 
l'aéroport oe la capitale ou pavs concerne. 

DISQUETTE JASMIN 

tn plus oes jeux, i ‘utilisateur aura ia possiomte de consulter hilrubtu 
co»«e un atlas, localisation oes pays, renseioneients oeeoqaoniques, 
économiques. superficie, lanque, monnaie, renoion, ... ue tout se taisant 
r apioe»ent orace a 1 accès direct au ficnier, une sortie sur imprimante oes 
ficnes et des cartes est possioie '.naro copy o ecran sur la plupart oes 
imprimantes présentes sur le marche ). 


JOE 


8 couleurs que c'est triste ! Maintenant g'ace a 256 couleurs sort disponibles sur OVJC. Oui vous avez bie* lu. 

Carte couleur/ 256 couleurs 



256 

cou leurs . 


^ nii j 


-Aucune perte de définition 

-Utilisation t'es sieple a partir du 80SK 

-ta totilite de la meioir? vive reste disponible 


ORIGRAPH 




cessette et disquette voir pub. THIOKIC noteras 4. 5 et 6 


(iPISPAPH est un looiciel de création graphique très puissant coipatible avec l’extension bf.1 (fonction OifCOLOb). 

SMCiHDLL est un jeu d'arcade en langage tachine. tn J 
tableaux, reussirez-vous a vaincre 1er ZOPKS avant ... L'INVASION 

finit U ! ‘ ! 



r 


HT 

MICRO FUTUR 

10,RUE DE L'ANCIEN HOPITAL 

5/ 100 ïliiL'NVlLLb 
iel. (»• 255 19 14 


tit r ? cassette 

disquette 


ÜRibRAPM - 150 F . 

- 350 F 


H1CRD5E0 - 140 f - 

SPACErAll - 120 F 

- 250 v 


CftNft 25b COULEURS HF.l . 

550 F ^ 



BON D£ COMMANDE| 

bon... ....... 

AMfSSÉ. 

coin postale. viLLt, . 

Rejieeenf: (rayer la menrio" inutile) cntOUE B^nCAlbi — CCP 
(frais de port et eibaltaqe 10 f) 


tnsiennriOH ... Support Cassette disquette 


REVENDEURS NOUS CONSULTER 


















































^courrier 


nouvelles 


Vincent CAMPANA 
91 LONGJUMEAU 

A quand les cassettes de THEO- 
HIC ? 

Nous ne pensons pas sortir sur 
cassette, comme nous le faisons 
sur disquette, les programmes 
publiés dans THEORIC, et ce pour 
deux raisons : la demande reste 
faible et la fiabilité du chargement 
cassette de l'ORIC, les différen¬ 
ces de réglages d'azimut, nous 
portent à croire que le "taux de 
retours” de ces cassettes serait 
bien trop important. 

Nous sommes maîtres de la dupli¬ 
cation de nos disquettes ; il nous 
serait impossible de maîtriser 
celle des cassettes. 


Olivier NAUOAN 
34 CASTELNAU-LE LEZ 

Pourquoi ne pas faire paraître des 
programmes de jeu plus élabo¬ 
rés ? Les vôtres sont nuis... La 
page trucs et astuces n 'est pas 
intéressante, en ce sens que ce 
qu'elle propose est évident pour 
le programmeur moyen... C’est 
beau de proposer les program¬ 
mes sur disquette, mais pourquoi 
pas sur cassette ? 

Voilà un lecteur qui ne mâche pas 
ses mots, même si sa conclusion 
(non reproduite ici) reste élo- 
gieuse pour THEORIC. Nous 
allons tenter de répondre. En ce 
qui concerne les jeux, il est diffi¬ 
cile de proposer, dans une revue, 
des jeux aussi performants que 
ceux que l'on peut trouver dans 
le commerce. A l'inverse, il 
existe, dans le commerce, cer¬ 
tains jeux édités qui, à notre avis, 
ne seraient même pas dignes de 
figurer dans une revue. 

Nous ne citerons pas de titre, par 
déférence envers les éditeurs 
concernés. Vous pensez que nos 
jeux sont nuis... ; ce n'est pas 
sympa pour leurs auteurs ! Sou¬ 
vent, il sont sans prétention, mais 
ont l'avantage de proposer aux 
débutants un peu de "matière 
première". Il en est de même 
pour les trucs et astuces : ce que 
vous connaissez vous, program¬ 
meur expérimenté, n'est pas for¬ 
cément connu de’ceux qui débu¬ 
tent et, c'est gens-là, ont certai¬ 
nement besoin de plus de 


conseils ! 

Pour les logiciels de bonne qua¬ 
lité, nous en avons une caisse, 
mais ils sont souvent longs... 
alors, comment les publier dans 
THEORIC ? Nous recherchons 
actuellement des solutions. 
Enfin, vous abordez le problème 
des cassettes : nous vous ren¬ 
voyons à la lecture de la réponse 
que nous faisons à Vincent CAM¬ 
PANA dans ce même numéro. 

Courrier reçu à propos du SUPER 
MONITEUR. Quelques lecteurs 
nous ont demandé de publier le 
listing "source" de SUPERMON. 

Ceci est impossible, à cause de 
la longueur inhabituelle de ce pro¬ 
gramme. C'est aussi la raison 
pour laquelle vous avez pu remar¬ 
quer quelques anachronismes, 
dans le rédactionnel accompa¬ 
gnant le programme, dûs au fait 
que l'auteur pensait que le listing 
source serait reproduit. 

Copies de logiciels existants. 

Nous avons reçu plusieurs offres 
concernant des "Trucs et Astu¬ 
ces” pour déplomber (on emploie 
le terme pudique de "copie anti¬ 
café") des logiciels commer¬ 
ciaux. Ne voulant pas favoriser 
de telles pratiques et aider à leur 
développement, nous répondons 
par la négative à toutes ces 
offres. 


La société ELECTRONIC CENTER 
(MICROFUTUR) nous a demandé 
un "droit de réponse” suite au 
courrier des lecteurs de THEORIC 
n° 13, dans lequel elle était mise 
en cause par M. Christian TEL- 
LIEZ. 

Notre lecteur se plaignait de 
n'avoir pas reçu une disquette 
commandée auprès de MICRO¬ 
FUTUR. Les faits sont très diffé¬ 
rents... En fait, il avait bel et bien 
reçu sa cassette ORIGRAPH mais 
elle ne fonctionnait pas. 
L'échange fut effectué, mais 
notre lecteur a reçu... une enve¬ 
loppe vide et ouverte. Les gérants 
de MICROFUTUR ont tenu à faire 
cette mise au point qui, il est vrai, 
tend à les disculper, car M. TEL- 
LIEZ ne nous avait pas donné la 
même version. 


LES IV* JOURNEES 
DE L'INFORMATIQUE 
DE L'ENSAIS 

C'est du 17 au 19 avril 1986 que 
l'Ecole Nationale Supérieure des 
Arts et Industries de Strasbourg 
accueillera les Journées de l'Infor¬ 
matique, patronnées par la Cham¬ 
bre de Commerce et d'industrie de 
Strasbourg et du Bas-Rhin. 

Dans les locaux de l'ENSAIS, sur 
une surface de 1800 m 2 , des profes¬ 
sionnels de l'informatique présente¬ 
ront leurs matériels et leurs services. 
L'exposition sera animée par un 
cycle de conférences sur : 

— l'organisation informatique de 
l'entreprise, 

— la télématique, 

— les aspects juridiques de l'infor¬ 
matique. 

Pour tout renseignement, s'adresser 
à : 

Mme. HACKENHEIMER ou 

M. MARCEL 

ENSAIS 

24, Bd. de la Victoire 
67084 STRASBOURG Cédex 
Tél.: 88.35.55.05. 

Ün’sÉRVEÜR. 

POUR VOUS SERVIR 


EUREKA a mis en place un ser¬ 
veur, tournant sur APPLE, qui dif¬ 
fusera, entre autres, des "trucs 
et astuces" concernant l'ORIC. 
Si vous avez découvert des cho¬ 
ses intéressantes, vous pouvez 
toujours en faire profiter les 
autres ! 

Le numéro de téléphone (1 seule 
ligne) : 

(16-1) 42.81.22.72 
Attention néanmoins à l'addi¬ 
tion ! 

Un serveur d'utilité publique fonc¬ 
tionnant à partir d'un ORIC-1, ce 
n'est pas courant, le fait mérite 
d'être signalé. M. BRISSET de BOU¬ 
TIQUE MEDIA (94), dont nous 
avons déjà parlé dans THEORIC, l'a 
mis au service des secouristes Protec¬ 
tion Civile du Val-de-Marne. Fonc¬ 
tionnant tous les jours (sauf de 1 h 
à 8 h), il est accessible au (16-1) 
48.99.80.80. 



ABONNES, votre indispensa¬ 
ble "laissez-passer" est l'éti¬ 
quette portant vos nom, 
adresse et numéro d'abonné, 
collée sur chaque enveloppe de 

THEORIC. 
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20, rue de Montreuil 94300 VINCENNES - Tel.: (1) 328.22.06 

OUVERT DU MARDI AU VENDREDI de 10 h 30 à 13 h et de 15 h à 19 h. LE SAMEDI de 10 h 30à 19 h 

REVENDEUR OFFICIEL AGRÉÉ ORIC-FRANCE 



Imprimante seikosha GP 500A 
50 caractères par seconde. 80 colonnes papier 
informatique permet l'édition de textes et gra¬ 
phismes de qualité correcte pour un prix raison¬ 
nable. La plus répandue en informatique familiale. 

□ imprimante SEIKOSHA GP500A 2680 F 


MODEM 

Votre ORIC s'ouvre sur l'extérieur II "discute" 
avec ses semblables et accède au réseau '‘minitel". 
Fourni avec interface intégrée et logiciel 
□ modem 1490 F 




Interface tous jeux 
Grâce è cet interface programmable vous utili¬ 
serez vos joysticks avec tous vos logiciels de jeux 
interface tous joui 425 F 






Rallonge Péritel 
Ne soyez plus "collé" à l'écran 
□ rallonge 


AMPLIBUS JASMIN 

Amplifie les signaux du bus permettant ainsi la 
connexion de 3 interfaces 
□ ampli bus . 350 F 


Interrupteur 
Ne courrez plus le risque de faire sauter la ROM 
□ interrupteur d’alimentation_80 F 

Synthétiseur vocal 

Enfin votre Oric peut s'exprimer ! Anglais d'orig ine 
il gardera son accent mais, grâce à un programme 
basic. vous dira "bonjour", "gagné" ou vous 
apprendra l'anglais ou l'allemand 
D synthétiseur vocal 

(avec câble connexion)__550 F 

_485 F 



Joystick TIRVITT 

Le "MUST" en matière de |oystick ! 8 directions, 
conlact par micro-contact, robuste, élégant, précis 
il ne vous décevra pas. garanti I an. compati 
ble standard ATARI et MSX 
C joystick TIRVITT 140 F 



□ quickshot2 . 140 F 



Imprimante MCP 40 

L'imprimante 4 couleurs aux couleurs d ORIC ! 
□ imprimante MCP 40 990 F 


% 


JASMIN 2 

Le lecteur de disquette que voire Oric préfère. 
Permet, entre autres, de recopier sur disquettes 
les logiciels (même plombés) sur cassette. 


'ensemble 

3490 F 


□ lecteur doublelète 




□ 50 super-jeux 
sur une cassette.. 




□ businessman. 

□ R.V. terreur . 95 F 

□ mission delta. 95 F 

□ millionnaire.— 120 F 

□ masterpaint . 250 F 

□ cité maudite.140 F 

□ mascadam bumper.160 F 

□ triathlon .150 F 

□ hades. 250 F 

□ saga.150 F 

□ cobra pinball.140 F 

□ 1815.160F 

□ meurtre gde vitesse.180 F 

□ hyperspace 4 .120 F 

□ stress.120 F 

□ échecs 3-7 .120 F 

□ basic turbo.140 F 

□ ordi-tiercé.140 F 

□ polyfichiers.180 F 

□ don juan et dragueurs.145 F 

□ objectif élysée .145F 

□ terminus.120 F 

□argon . no F 

□ xénon.110 F 

□ catég. oric. 95 F 


2690 F 


LOGICIELS CASSETTE 

□ hu *bert.120 F 

□ 3 0 munch .140 F 

150 F □super-jeep 120 F 

□ doggy.120 F 

□ orthocrack vol. 1 .160 F 

□ orthocrack vol. 2 160 F 

□ orthocrack vol. 3 .160 F 

140 F □tic-tac.120 F 

□ vision.120 F 

□ basic français.180 F 

□ challenge voile.140 F 

□ lotoriciel .120 F 

□ las vegas. 95 F 

□ waydor.140 F 

□ colorie.105 F 

□ trésor du pirate.105 F 

□ monopolic.160 F 

□ nessy. 95 F 

□ affaire en or..155 F 

□ worldwar3. 95 F 

□ frelon.160 F 

□ starter 3 D.130 F 

□ roland garros.120 F 

.185 F 

□ multicalc.190 F 

□ secret de kaipur.130 F 

□ 3 D fongus 180 F 

□ flipper (loriciel) .180 F 

□ montsegur.140 F 

□ stanley .120 F 

□ cobra.140 F 

□ détective story.150 F 


GRAPHISCOP II 

Conçue et fabriquée en France, la tablette gra¬ 
phique à digitaliser "GRAPHISCOP II” vous per¬ 
mettra de dessiner à la fois sur un papier et 
à l'écran en utilisant la résolution graphique 
maximale de votre micro-ordinateur. 
"GRAPHISCOP II" est livrée avec un boîtier 
interface connectable à votre micro, un manuel 
dutilisation. un logiciel sur cassette ou disquette. 
La partie principale du Source est en Basic pour 
permettre à l'utilisateur d'a adjoindre de nouvelles 
fonctions. 


NOUVEAU 


/ 

/ 



□ GRAPHISCOP II (avec interface). 1490 F 



Mannesman!) MT 80S * 

L'imprimante "top niveau" eninformatiqueia- 
miliale 100 caractères par seconde. Papier 
normal ou informatique. Entrainement par 
friction ou traction. Si vous recherchez une 
qualité "courrier", la MT 80S vous donnera 
plus que des satisfactions tant pour le texte 
que pour le graphisme 
□ Mannesmann MT 80S. 3950 F 



□ zoolympic . 

□ the hobbit (livre français). 

.120 F 

. 250 F 

Ucanmbal . 

□ tendre poulet. 

. 95 F 

.120 F 

'"TT r"> 

JEUI 

□ assembleur symbolique . 

. 280 F 

□ durandal . 

.120 F 

i « 


□ lorigraph. 

. 280 F 

□ planète bleue. 

1 20 F 

'fSitli — ■ 


□ mystère kikekankoi.180 F 

□ intex et zoë.180 F 

□ le retour du dr génius.160 F 

□ citadelle .120 F 

□ diamant ile maudite.180 F 

□ aigle d'or .180 F 

□ crocky.120 F 

LIVRES 

□ manuel de référence.138 F 

□ la découverte de l'oric.. 95 F 

□ oric à l'affiche 95 F 

□ oric atmos pour tous.105 F 

□ clefs pour ORIC .105 F 

□ cahier du basic sur ORIC . 65 F 

□ assembleur ORIC ATMOS . 95 F 

□ 102 prog. pour ORIC.120 F 

□ programmes en lang. mach. 95 F 

□ pratique de l’oric atmos .100 F 

□ 6502 : programma, en assembleur. ..215F 

□ jeux graphiques ou Atmos . .. 95 F 

□ applications du 6502 .105 F 

□ logo (loriciel). 295 F 


□ j'apprends l'anglais.140 F 

□ course aux lettres. 95 F 

LOGICIELS DISQUETTE 
(pour lecteur JASMIN) 

□ assembleur.490 F 

□ easylext . 590 F 

□ logo-graph.390 F 

□ gestion familiale . 390 F 

□ astro-calculs.490 F 

□ en route vers la galaxie . 390 F 

□ les conquérants. 240 F 

□ origraph . 350 F 

□ multilich. 590 F 

□ cale . 590 F 

□ mathegraph .390 F 

□ le rebelle. 240 F 

ZONGA : tondre la pelouse, tailler les fleurs, 
surveiller le niveau d'énergie, ne pas se faire 
prendre par le méchant crocky! 12 tableaux 
et un éditeur vous permettant d'en créer au¬ 
tant que vous le désirez. Pour ORIC 1 et 
ATMOS. 

□ ZONGA - la disquette.198 F 


Carte E/S 

Vous permet de commander moteur, relais, lampe, 
sonnerie, projecteur 

□ carte 8 E/S. 395 F 


IjT 


Carte E/A 

Pour transformer votre Oric en centrale de me¬ 
sures. Possibilité de brancher plusieurs cartes 
□ carte 8 E/A__ 395 F 


Magnétophone 
Ce magnétophone spécialement conçu pour les 
micro-ordinateurs vous évitera bien des soucis. 
Entrée DIN ou Jack Niveau réglable. Témoin 
sonore et lumineux. Alimentation intégrée 
□ magnétophone ....390 F 




Imprimante Smith Corona Fastext 80 
• 80 caract./sec.. impression bidirectionnelle, 
entrainement par friction, interf. contronic. huiler 
intégré, écriture normale ou condensée 

□ Fastext 80 . 1995 F 

Branchement ordinateur/magnéloscope 
Grâce à cette interface laissez brancher en per¬ 
manence votre ordinateur et votre magnétoscope. 
Prévoir une alimentation 12 V 

□ interface ordi./magnétosc__345 F 


Moniteur 12" 

Splendide moniteur 12" monochrome verl ou 
ambre. Un modèle professionnel à un prix grand 
public. 

□ moniteur 12" vert ou ambre_ 1400 F 

Câble Imprimante 

Vous permet de connecter votre Oric â n’importe 
quelle imprimante au standard "centronic" 

□ câble imprimante.150 F 

Câble Moniteur 

Pour brancher votre One à un moniteur mono¬ 
chrome 

□ câble moniteur__55 F 


Carte mère 

Grâce à ce câble vous pourrez connecter 3 inter¬ 
faces et garderez la possibilité de brancher un 
lecteur de disquettes 

□ carte mère 3 slots__ 205 F 

□ même modèle mais 1 slot... 95 F 



Cassette spéciale micro 

□ les 5--45 F 

□ les 10_____80 F 


□ disquettes vierges 3". unité.35 F 

□ disquettes vierges 3". par 10.350 F 


COMMENT COMMANDER : 

- Cocher lefs) articlefs) désiréfs) ou faites-en une liste sur une feuille à part - Faites le total + frais de port (20 F pour achats inférieurs à 500 F. 40 F de 500 à 1000 F. 60 F pour tout achat supérieur à 1000 F). 
Je possède : DORIC1 □ ATMOS 

NOM : _ _ PRENOM : __ 


- TEL :_ 

ADRESSE : _ CODE POSTAL : 

Mode de paiement : □ chèque □ mandat □ contre-remboursement (prévoir 20 F de frais) 
envoyer le tout à ORDIVIDUEL 20, rue de Montreuil 94300 VINCENNES 
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fhftorir 

VITRINE DU LOGŒL 


I 'TIE-BREAK'' 
ISPRITES) 

Simulation Tennis 

Enfin un jeu de la 
société SPRITES I Et 
pas des moindres, 
puisque c'est un 
tennis, ha mais pas 
un pourri qu'on 
trouvait sur les 
consoles de jeu, il y a 
quelques années 
(déjà !), ou qu'on 
appelait à l'époque 
balle... Fini, tout cela. 
Aujourd'hui, on 
matérialise les 
joueurs, on joue en 
trois dimensions avec 
un filet, des 
spectateurs, etc ; 
y'en a même qui 
parlent, ce n'est 
malheureusement pas 
le cas du produit de 
Sprites. Mais 
revenons à notre 
tennis qui est, disons- 
le tout de suite, 
superbe, voire même 
superbe. Après le 
chargement, l'écran 
devient tout noir et 
apparaît alors un 
agrandissement des 
"Sprites”, utilisé pour 
représenter les 
joueurs en attendant 
que vous choisissiez 
votre option, car il y a 
plusieurs options : 
deux joueurs ou un, 
automatique ou non 
(dans le mode 
automatique, vous 
n'avez qu'à vous 
placer sur la balle, 
l'ordinateur se 
chargeant de choisir 
le coup approprié à la 
situation), le petit plus 
étant la 

démonstration qui est 
pour le moins géniale, 
l'écran de votre 
moniteur est triste 



lorsqu'il est noir, 
non ? Vous venez de 
lui trouver du travail, 
même lorsque vous 
ne jouez pas. 

Passons au jeu 
proprement dit. 
L'ordinateur vous 
demande d'abord le 
nombre de sets 
gagnants à jouer 
(1-3), puis votre nom, 
et vous voilà plongé 
dans l'enfer de Roland 
Garros, Wimbledon, 
ou encore la Coupe 
des Vices (jeu de 
mots). Le service, s'il 
est bien imité, est 
rarement gagnant. 
L'adversaire ne peut 
pas être pris de 
vitesse sur un service, 
dommage ! La balle 
rebondit mollement, 
et c'est alors que 
vous vous apercevez 
qu'elle passe du noir 
au blanc au niveau du 
filet pour redevenir 
noire, une fois celui-ci 
passé, encore un 
problème de proximité 
de couleurs ! L'ombre 
de la balle a la même 
forme, la même taille 
et la même couleur 
que la balle : c'est 
très, très, très 
gênant, mais on 


s'habitue à ce petit 
problème. Sinon, le 
jeu est relativement 
bien imité, même si 
certains coups sont 
très durs à obtenir. 

Les montées au filet 
ne permettent pas de 
conclure rapidement 
un point, le smash 
étant plutôt 
mollasson, "m'enfin", 
personne n'est 
parfait I* 

Pourtant, ces défauts 
sont infimes, face à 
toutes les qualités du 
logiciel, c'est un 
produit fort bien 
réalisé et 

particulièrement bien 
fini : Tie-break, option 
son, musique réglable, 
pause... 

En fait, la vitesse de 
la balle varie en 
fonction de différents 
paramètres, ce qui 
n'est pas toujours 
évident. Cest alors 
qu'on vient à penser 
que si ce logiciel est 
complet et attrayant, 
il lui manque pourtant 
une chose : l'option 
MAC-ENROE, vous 
savez, celle qui 
permet d'insulter les 


arbitres, histoire de 
passer sa colère 
d'avoir manqué un 
revers...V BOURREE. 


"MICROGEO" 
(MICRO FUTUR) 
Educatif 
140 F cassette 
250 F disquette 


Il existe peu de 
logiciels éducatifs sur 
ORIC, aussi sommes- 
nous enchantés de 
vous présenter 
"MICROGEO" qui, 
outre le mérite 
d'exister, a également 
celui d'être fort bien 
réalisé. Nous n'aurons 
pratiquement aucun 
reproche à lui faire. 
Nous avons testé la 
version disquette pour 
JASMIN. 

La présentation est 
très agréable, le jeu 
de caractères 
entièrement redéfini. 
Les cartes de 
géographie 

apparaissent en haute 
résolution et sont très 
bien dessinées. L'outil 
graphique ayant servi 
à leur réalisation est 
ORIGRAPH, 
également produit par 
le même éditeur. 
Intégrant 5 cartes et 
122 pays, 

MICROGEO va mettre 
vos connaissances à 
rude épreuve ou... 
vous inciter à vous 
améliorer. Le logiciel 
est en trois parties : il 
est ainsi possible de 
consulter un fichier, 
voir les grandes 
productions de 
matières premières et 
jouer. 

L'édition de fiches 
très complètes est un 
atout. 
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le CATALORIC 

C’EST QUOI! 

0> logiciels utilitaires 
C> logiciels de jeux 
C> logiciels éducatifs 
t> accessoires 
[> interfaces 
C> imprimantes 
C> livres 

C> ... 

C’est le GAIALogue c/ORIC 

enfin disponible. 


s 


43 . 38 . 60.00 



Vente Informations Services Micro-Ordinateurs 

THicro oxcCiKdttux^ familiaux 




t son rnfe 


Méirc Bajtüte ou Cb» min Vtn 
Di 10 h 4 20 b nnf rtimsr>rha si hintl 




C hoisir une imprimante, périphérique important du micro¬ 
ordinateur, n'est pas chose facile. S'il est vrai que la ponction 
effectuée sur le porte-monnaie est déterminante, il y a d'autres 
facteurs à prendre en considération. 


Parmi les nombreuses impriman¬ 
tes qui existent sur le marché de 
l'ordinateur familial, il en est qui 
émergent, soit par le prix, soit par 
les possibilités, soit par leur 
renommée. Certaines allient tous 
ces avantages et sont présentes 
sur bien des catalogues de 
revendeurs. 

La MT80S de MANNESMAN- 
TALLY est de celles-là. 

Pour moins de 4000 F, la MT80S 
met à votre portée d'excellentes 
caractéristiques : une mécanique 
robuste (il n'y a qu'à ouvrir le 
capot et regarder les pignons 
d'entraînement), un encombre¬ 
ment qui reste acceptable (385 x 
320 x 130 pour un poids de 5 kg) 
et un jeu complet de modes 
d'écriture que nous allons exami¬ 
ner. La vitesse de travail (100 
cps) est également un atout. 

Il est irritant, sur certains maté¬ 
riels, de devoir se livrer à une 
gymnastique fastidieuse pour 
introduire le papier dans la 


machine. Ici, ce ne sera pas le 
cas : le circuit papier est très bien 
étudié, et les risques de "bour¬ 
rage" sont réduits. Le ruban 
encreur est livré sous cartouche, 
ce qui évitera de laisser des dis¬ 
gracieuses (ou traitres) emprein¬ 
tes digitales après sa manipula¬ 
tion. 

Bien sûr, la MT80S n'admet pas 
seulement du listing "accor¬ 
déon", mais aussi du papier nor¬ 
mal, pour faire vos rapports ou 
votre courrier. L'entraînement du 
papier se fait par traction (listing) 
ou friction (normal). 

La mise sous tension s'effectue 
par un interrupteur disposé sur le 
flanc droit de l'imprimante. Dès 
qu'il est actionné, les voyants 
POWER, READY, ON LINE, situés 
sur la face avant, s'allument. Un 
indicateur "PAPER OUT" vous 
informera de l'absence du papier. 
Deux commandes, FF (Form 
Feed) et LF (Line Feed) permet¬ 
tent, à condition que l'imprimante 



soit "off line", de faire avancer 
le papier par page ou ligne. 

Un auto-test peut être déclenché 
à la mise sous tension, si on 
active l'interrupteur en même 
temps que l'on appuie sur LF : le 
jeu de caractères est alors 
imprimé en continu. 

La longueur d'une page peut être 
réglée à 66 ou 72 lignes (papier 
11 pouces ou 12 pouces). 
L'initialisation de l'imprimante 
peut se faire par logiciel, 
commandée directement à partir 
du micro par l'envoi de la 
séquence ESC 

Le jeu de caractères comporte 96 
caractères normaux, 96 italiques, 
87 caractères spéciaux et codes 
de commande, 103 caractères 
semi-graphiques. 


Je suis l’imprimante MANNESMANN TALLY NT 80S. 
et je vous propose plusieurs modes d’ecriture... 

- Normal - 

! <)*+,-. /0123456789: ; < = >?àABCDEFGHIJKLMNOPQRSTUOWXYZ * £§ A _ 1 

abcde-fghijklrnnopqrstuvwxyzéùè 

Vo ici le- mode- élargi , 
pour 1 e- 5 t i t t~- e- s - 
ou le iode condense, pour gagner de U place... 

Bien entendu, o n peut rnela.nger. . . 

Ecrivons en plus gras 

El t en GROS et GRAS 
Normal Expa “® rlt 
Normal xt <= «■ 
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Il est à noter que l'accès aux dif¬ 
férents jeux de caractères s'ef¬ 
fectue par soft intégralement ou 
par hard (dip-switches), ce qui est 
très intéressant. 

Les caractères sont définis sur 
une matrice 7x8 ou 8x8 en 
semi-graphique. Le mode graphi¬ 
que autorise 640 points par ligne. 
Le mode ''normal'' est complété 
d'un mode "condensé" et d'un 
mode "élargi". 

De 80 caractères par ligne, on 
passe à 142 caractères en mode 
"condensé". En mode élargi, on 
peut écrire sur 40 colonnes. Les 
modes "Elite" et "Exposant" 
sont aussi disponibles. 

Un petit exemple étant préférable 
à tous les longs discours, vous 


trouverez, dans cet article, une 
présentation des différents 
modes d'écriture. 

La séquence code ESC suivie de 

I ou 2 caractères sera fréquem¬ 
ment utilisée ; il est ainsi possi¬ 
ble d'accéder à toutes les res¬ 
sources de l'imprimante : mar¬ 
ges, soulignement, modification 
d'interligne, écriture proportion¬ 
nelle, tabulation et même les 
mises en et hors "line" de l'im¬ 
primante. 

II est intéressant de noter qu'un 
"DUMP" hexadécimal des carac¬ 
tères envoyés à l'imprimante 
peut être reproduit sur papier ; 
cela est très utile lors de la mise 
au point de certains logiciels. 

Le mode graphique "bit-image" 


ne sera pas utilisable directe¬ 
ment, et il faudra écrire un logi¬ 
ciel, mais cela vaut pour toutes 
les imprimantes, le HARD COPY 
graphique (ou texte) n'étant pas 
prévu dans le Basic de l'ORIC. 
Dans ce mode, les profils binai¬ 
res à reproduire sont définis sur 
deux octets, représentant le nom¬ 
bre de bits qui suivent, chaque bit 
représentant lui-même un point 
image. La copie graphique pourra 
se faire en simple ou double den¬ 
sité. 

La notice, bien qu'écrite en 
anglais, est suffisamment 
complète pour aider le program¬ 
meur, efficacement, lors du déve¬ 
loppement de logiciels utilisant 
l'imprimante. 

Les essais auxquelles nous avons 
procédé pendant la période du 
test montrent que le matériel est 
très sérieux, robuste et facile à 
utiliser. Servie par un bon logiciel, 
la MT80S possède bien des 
atouts : fiabilité, vitesse de tra¬ 
vail ( 100 cps en mode normal) et 
simplicité d'emploi, complétés 
par le caractère multi-usages du 
matériel. 

Lorsque nous vous aurons dit que 
cette imprimante est diponsible 
chez ORDIVIDUEL, annonceur 
dans THEORIC, et que le Père- 
Noël a convaincu le gérant du 
magasin de faire une promotion 
à l'occasion des fêtes (3350 F au 
lieu de 3950 F), vous convien¬ 
drez qu'il est peut-être temps de 
vous équiper de ce périphérique 
capable d'imprimer votre courrier 
et vos listings. 




Gagnez un 
abonnement à 


Votre revue préférée servie gra¬ 
tuitement à domicile : le rêve, 
non ? 

Il peut rapidement devenir réalité 
si vous participez à l'élaboration 
de THEORIC. La publication d'un 
programme entraînera l'abonne¬ 
ment de son auteur (ou la prolon¬ 


gation de son abonnement) pour 
une durée de trois mois, six mois 
ou un an. Nous contacterons les 
auteurs des meilleurs travaux et 
leur proposerons une participa¬ 
tion plus régulière mais rémuné¬ 
rée. Avis aux amateurs. 
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Wolfram LUTHER 


Q uoi de plus triste qu'un programme soigneu¬ 
sement réalisé; testé dans ses moindres détails, 
prêt à être montré aux amis et qui reste triste 
par l'absence de jolie page titre. Voici comment réa¬ 
liser quelques belles figures géométriques. 



Inspirés par une notice parue 
dans "ORIC OWNER", confrère 
britannique de THEORIC, nous 
proposons deux petits program¬ 
mes qui créent de très jolis des¬ 
sins en forme d'étoile, de rosette 
ou d'animal. 

Le principe est vite expliqué : 
Au milieu de l'écran, on place un 
cercle fixe de rayon RF et un 
deuxième cercle se déroule sur ce 
premier comme dans un rouage 
où deux roues se touchent. On 
trace le rayon qui relie le centre 
du deuxième avec le point 
commun des deux cercles à l'ins¬ 
tant t = O et suit sa trajectoire en 
cours de déroulement (paramètre 
PA, pas de travail). Le procédé se 
termine après RE révolutions. 
Pour varier les dessins, nous 
avons introduit un paramètre V 
(vitesse) de transmission et un 
troisième cercle (voir programme 
2 ). 


Les programmes vous proposent 
deux options : 

— une démonstration — toute 
une panoplie de différentes 
valeurs pour les paramètres en 
question est présentée (ins¬ 
truction READ-DATA) ; 

— le choix libre — vous pouvez 
expérimenter à votre guise et 
introduire vos paramètres. 

Nous donnons les deux listings et 
quelques échantillons des résul¬ 
tats. 

10 REM DOUBLE SPIROGRAPHE 
20 HIRES 

20 PRINT" D DEMO C CHOIX F FIN" 

40 GETA$ : IF A$="F" THEN TEXT : END 
50 IF A$="D" THEN 200 
60 IF R$<>"C" THEN 40 
33 CLS 

100 INPUT "RAYON DU CERCLE FIXE ! > RF 

101 INFUT "RAYON DU 2. CERCLE•";R2 

102 INPUT "RAYON DU 3. CERCLE=";R3 

110 RB=RBS(RF+R2> : AC=A6S<R2+R3) : AE=ABSC 
R3 ') 

115 IF AB+RC+flE>100 THEN ZAP = PRINT"S0f1H 
E DES RAYONS TROP IMPORTANTE"» GOTO 100 






«'120 INPUT "F’flS DE TRAVAIL : ; PR 

121 INPUT "REVQLUTIONS»" i RE 

122 IHPUT "VITESSE »" i V«CLS«GOSUB300 
130 STOP : GOT020 

200 FORA=l TOI7 
210 RERORF,R2,R3,PA,RE,V 
220 GOSUB300 
230 IFA=17THEN 240 

235 PRIHT ! PRINT"CONTINUER-TAPEZ UNE TOU 
CHE" : GETA$ 

240 NEXTA 
250 RESTORE 
260 GOTO20 

270 DATA 30,20,10,.1,2,1 

271 DATA 30/20,-40/.2.-5/1 

272 DATA 100/-50/10/.1,2/1 

273 DATA 100/-50/10/.1/2/0 

274 DATA 100/-50/10/.1/1/2 

275 DATA 100/-50,10/.1/2/3 

276 DATA 30,-30,-10,.1,2,1 

277 DATA 30 , —30 , — 10/ • 1,2,0 
273 DATA 80/-30/-10,.1/2/.25 
273 DATA-50/S0/-70/.l/4,l 

230 DATA -10/50,-30/.1/1/1 

231 DA TA 40 .• 20,5,. 1,2/0/40/20/5, • 1,3,1, 
40,20/5/.05,2,3/40,20,5,•05,2,5 

232 DAT A 40,20,5,.025,2,7 
230 DATA -10/50,-30/.1/5,0 

300 HIRES = FOR 1 = 1TO2Ù0 = FILL1,1,RHD<1>*3 
= NEXT 

310 PRIAT : F'RIHT"RF=",RF, " R2="/R2," R3= 
" ; R3 

311 FRI NT "PAS = ", F'A, " REVO=";REj " VITES 

; V 

*315 EL =.8 : EN=1 
320 FORT=0 TO 2*PI*RE STEP PA 
330 X*<RF+R2 >*SIN<T>*EL»Y=-<RF+R2>*COS< 
T >*EM 

340 CUP.SET 120+X,100+Y,3 
350 2=T*<V+<RF/R2>) 

360 X1=-R2*SIN<Z >*EL » Y1=R2*C0S<Z>*EM 
37Ô DRAW XI,Yl/1 

371 X2=(R2+R3 >*SIN<Z>*EL » Y2=-< R2+R3>*CO 
SC Z >#EM 

372 CURSET 120+X+X2,10Û+Y+Y2,3 

373 Z=T*< V+C R2/R3 > > 

374 X1--R3*SIN<Z >*EL»Y1=R3*C0S<Z >*EH 

375 DRAW Xl/Yl/1 
330 NEXT 

330 F'ING ; RETURN 


10 REM SPIROGRAPHE 
20 HIRES 

30 FRINT" D DENO C CHOIX F FIN" 

40 GETA$= IF A$="F" THEN TEXT ' END 
50 IF A$="D" THEN 200 
60 IF A$< >"C" THEN 40 
30 CLS 

100 INPUT "RAYON DU CERCLE FIXE»";RF 

101 INPUT "RAYON DU CERCLE MOBILE»"/RM 
110 IFABSC RF+RM)+ABS< RM)>100 THEN ZAP» 

PRINT"C!RF+RM!+IRMIX=100"»GOTO100 
120 INPUT "PAS DE TRAVAIL»"/PA'REM 0<PA 
<•2 

V_ 



121 INF'lJT "NOMBRE DE REVOLUTIONS»", RE 

122 INPUT "VITESSE »",V » CLS » GOSUB300 

130 FRINT ! PRINT"CONTINUER-TAPEZ UNE TOU 
CHE"»GETA$ 

140 GÜTO20 

290 FORA=l T021 

2r0 READRF/RM/PA/RE/V 

220 GOSUB300 

230 IFA=21 THEN 240 

235 PRINT : PRINT"CONTINUER-TAPEZ UNE TOU 
CHE"■GETA$ 

240 NEXT A 
250 RESTORE 
260 GOTO20 

270 DATA 100,—60,.1,3,0,100,-60,.1/3,1, 
100,-60,.1,3,2 

271 DATA 10/45,.1,3/1,10/45,.1/4,2/10,4 
5/.1,4/0 

272 DATA 30/—30/•1,3/0,30/—30/.1/3/1/80 
■—30• 1/3/2 

' 273 ’ data'30,35/.1/7/1/30,35,. 1,7,2 

274 DATA -40,70,.1,8,1 ,-40,70,.1,7,0 

275 DATA -30,60,.1,2,1,-30,60,.1,2,0,-3 
O,60,•1,2,2 

27*5 DATA 10,30,. 1,5,1,10,30,.1,3/0 
277 DATA 100,-30,.2,3,1,100,-30,.2,3,0 
280 DATA -50,60,.2,6,1 
230 DAT A 60,-70,.2,3 

300 HIRES » FOR 1 = 1TO200» FILL1,1,RNDC1>*8 
» NEXT 

310 PRINT=PRINT"RF="iRF," RM="; RM," PAS 
=", PA .= " REVO= " ; RE.» " VI TESSE=" ; V 

320 FORT=0 TO 2*PI*RE STEP F'A 
330 X=CRF+RM)#SINC T) = Y=-C RF+RM)*COSC T > 
340 CURSET120+X,1O0+Y,3 
350 Z=T*CV+CRF/RM)) 

360 X1=-RM*SINC Z)» Y1=RM*COSCZ > 

370 DRAWX1,Y1,1 

330 NEXT 

330 PING : RETURN 


T?F= 100 RM=-90 PRS= .2 REVÜ= 9 
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Serge BRUNET et Michel ZUPAN 


L e FORTH se met à flotter ! En cinq écrans et un peu plus d'un 
kilo-octet, voici comment étendre le langage aux calculs en vir¬ 
gule flottante. 


AVEC OU SANS 
FLOTTEUR ? 

D'aucuns ont souvent reproché 
au FORTH de ne pas autoriser 
l'usage des nombres en virgule 
flottante, contrairement aux 
autres langages évolués. Les For- 
thiens puristes répondent que 
toute application scientifique 
peut être programmée en virgule 
fixe, ce qui revient à utiliser des 
entiers, avec la précision optimale 
souhaitée (57 décimales si cela 
vous chante) et des temps de cal¬ 
cul bien inférieurs, à précision 
égale. 

C'est vrai, mais il faut reconnaî¬ 
tre que la moindre calculatrice de 
poche nous a trop habitués aux 
facilités des calculs flottants et 
que nous avons perdu l'habitude 
d'aligner les décimales pour une 
petite multiplication. 

Comment s'étonner dès lors que 
les versions récentes de FORTH 
proposent une extension aux 
"flottants" ? 

DES FLOTTANTS ORIC ! 

Plutôt que d'écrire avec les seuls 
outils FORTH un vocabulaire flot¬ 
tant, il nous a semblé amusant de 
"pomper" dans la ROM Basic de 
l'ORIC les routines virgule flot¬ 
tante et pouvoir ainsi utiliser des 
nombres dont nous avons l'habi¬ 
tude : nous savons déjà que 
FORTH a le génie de l'adaptation 
à son environnement. 

Les nombres flottants seront 
donc codés sur six octets comme 
dans l'accumulateur flottant FAC 
de l'interpréteur Basic et occupe¬ 
ront de ce fait trois cellules sur la 
pile des données du FORTH. 
Nous développerons autour 


d'eux tout un vocabulaire en "tri¬ 
ple précision" pour les manipuler 
sur la pile avec des opérateurs et 
des fonctions respectant scrupu¬ 
leusement une syntaxe polonaise 
inverse, propre au FORTH. 

LE PROGRAMME 

Il est bien sûr écrit avec ASSEM¬ 
BLER et compilé dans le diction¬ 
naire FORTH, bien qu'il soit envi¬ 
sageable de créer un vocabulaire 
spécifique. 

Il nous a fallu, malgré tout, jouer 
à cache-cache avec le Basic, si 
bien que nous utilisons d'abord 
deux écrans pour des opérations 
de transfert : 

SMATH est une zone de sauve¬ 
garde de 48 octets pour nos cal¬ 
culs mathématiques. 

TIB> et >TIB sont des routines 
de sauvegarde et de récupération 
du TIB (Terminal Input Buffer) qui 
risquerait d’être écrasé par la rou¬ 
tine BASIC FOUT de conversion 
des flottants en chaînes de carac¬ 
tères. 

ST > et > ST font de même avec 
une partie de la pile. 

>F, F>, >A et A> opèrent les 
passages entre la pile et les accu¬ 
mulateurs FAC et ARG du Basic. 
Notre troisième écran contient les 
primitives d'utilisation des flot¬ 
tants : 

(FIN) interprète une chaîne de 
caractères pour placer un flottant 
sur la pile. Nous n'avons pas 
hésité à utiliser le CHARGOT de 
l'interpréteur Basic (un comble I). 
(FOUT) transforme le flottant sur 
la pile en une chaîne dans 
SMATH. 

FOPR prépare une définition 
d'opérateur sur deux flottants. 
FUNCT fait de même pour une 


fonction sur un flottant. 
Précisons ici pour les ORIC-1 
qu'on trouvera, dans le livre 
d'André CHENIERE, les équiva¬ 
lents des adresses de la ROM que 
nous donnons ici pour ATMOS. 
Nous coriseillons également de 
modifier un peu (FOUT) pour évi¬ 
ter les chiffres verts : après 100 , 
Y LDA, introduire un test rempla¬ 
çant 02 par 20. 

Les quatrième et cinquième 
écrans fournissent enfin les mots 
utilisateurs du vocabulaire flot¬ 
tant : 

S —F transforme sur la pile un 
entier simple en flottant. 

F^S fait l'opération inverse. 
FDUP FSWAP FOVER et FDROP 
s'utilisent comme leurs équiva¬ 
lents simples sur la pile. 

F# interprète le "mot" qui le suit 
comme un flottant et le dépose 
sur la pile ou le compile dans une 
définition. 

Exemples : 

F# -1.234 
F# 2E-3 

F# #FFFF (tiens, les hexas du 
Basic). 

INPUT# s'utilise comme IN# 
pour-attendre un flottant au cla¬ 
vier. 

F-point affiche le flottant décimal 
du sommet de la pile. 

F + F - F*F/Fl sont les opérateurs 
de l'addition, soustraction, mul¬ 
tiplication, division décimale, 
exponentiation de deux flottants 
sur la pile selon la notation polo¬ 
naise avec résultat sur la pile. 
Signalons que la définition simpli¬ 
fiée des calculs de puissances par 
Fl n'accepte pas les arguments 
décimaux négatifs et que les cal¬ 
culs récursifs de cette fonction 
peuvent aboutir à des plantages 
en overflow. 

De LN à FABS, nous trouvons 
toute une série de fonctions bien 
connues, remplaçant le flottant 
sur là pile par sa fonction définie. 
FLOTTANT est l'équivalent de 
VARIABLE pour les flottants avec 
leurs opérateurs spécifiques. 
REEL équivaut, quant à lui, à 
CONSTANT et nous définissons 
ainsi PI qui termine notre pro¬ 
gramme. 

Le sixième écran est une astuce 
générale pour compiler notre 
vocabulaire flottant ou toute 
autre application et "oublier" 
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ensuite ASSEMBLER devenu inu¬ 
tile dans le dictionnaire. Utilisable 
en tout, FORTH dise (JASMIN ou 
T-FORTH) la procédure doit être 
manuelle avec les cassettes en 
raison de la mise à zéro de la pile 


par le mot CLOAD. 

Les plus matheux ne manqueront 
pas d'exploiter cette extension 
flottante pour s'offrir un outil 
expansif à volonté : fonctions 
transcendantes, nombres com¬ 


plexes, facile émulation d'un cal¬ 
culateur HP, résolutions d'équa¬ 
tions sophistiquées, etc. 

...NEC MERGITUR : permettez 
aux Forthiens, que nous som¬ 
mes, de retourner à nos entiers ! 


SCRNff 
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( 0> 

( EXTENSION NOMBRES FLOTTANTS POUR A1 MOS ) 


( 1) 

FORTH DEFINITIONS ASSEMBLER HEX 


( 2> 

0 VARIABLE SMATH 30 ALL.OT 


< 3> 

HERE 

0 If LDY, BEGIN, 100 ,Y LDA, SMAFH ,Y STA, INY, 


( 4 > 


10 t* GPY, 0= IJNTll , RIS, 


< 5) 


EQU TIB> ( Tib --> Smath ) 


< G) 

HERE 

0 If LDY, BFGIN, SMATH ,Y LOA, 100 ,Y STA, INY, 


( 7) 


10 ff CPY, 0= UNTIL, RTS, 


( n> 


EQU >TIB ( Smath —> Tib ) 


( 9) 

HERE 

0 If LDY, BEGIN, 90 ,Y LDA, SMATH 10 + ,Y STA, 

INY, 

(10) 


10 ff CPY, 0= UNTIL, RTS, 


<1 1> 


EQU ST> (Pile —> Smath ) 


(1?) 

HERE 

0 ff LDY, BEGIN, SMATH 10 + .Y LDA. 90 ,Y STA, 

INY, 

(13) 


10 If CPY, 0= UNTIL, RTS, 


(14) 


EQU >ST ( Smath --> pile) 


(15) 

—> 
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( 0) 

( FLOTTANTS 2 

) 


( 1) 

HERE 

0 ff LDY, 

BEGIN, 0 ,X IDA, D0 ,Y STA, INX, 

INY, 

( 2) 


6 ff CPY, 

0= UNTIL. 0 ff LDY. DE STY, RTS, 


( 3) 


EQU >F ( 

flottant —> FAC ) 


( 4) 

HERE 

6 ff LDY, 

BEGIN, DEX, CF ,Y LDA; 0 ,X STA, 

DEY, 

( 5) 


0= UNTIL 

. RTS. 


( G) 


EQU F> ( 

FAC —> flottant ) 


( 7) 

HERE 

0 ff LDY, 

BEGIN, 0 ,X LDA, D8 ,Y STA, INX, 

INY, 

( B) 


6 ff CPY, 

0= UNTIL, DD LDA, D5 EOR, DF SIA 

, 0 ff LDY, 

( 9) 


DF STY, 

RTS, 


(10) 


EQU >A ( 

flottant —> ARG ) 


(11) 

HERE 

G ff LDY, 

BEGIN, DEX, D7 ,Y LDA, 0 ,X STA, 

DEY, 

(12) 


0= UNTIL 

, RTS, 


(13) 


EQU A> ( 

ARG —> flottant ) 


(14) 

—> 




(15) 
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( 0) 

( FLOTTANTS 

3 ) 

( 1) 

CODE 

(FIN) 

XSAVE STX, ST> JSR, E8 JSR. DFE7 JSR, >ST JSR, 

( 2) 



XSAVE LDX, F> JSR, NEXT JMP, ;C 

( 3) 

CODE 

(FOUT) 

>F JSR, XSAVE STX, T1B> JSR, ST> JSR, F0D5 JSR, 

( 4) 



0 ff LDY, BEGIN, 100 ,Y LDA, SMATH 21 + ,Y STA, INY, 

( 5) 



RF ff CPY, 0= UNTIL, FF ff LDY, 0 f» LDA, SMATH 30 + 

( 6) 



STA, BEGIN, INY, SMATH 21 + ,Y CMP, 0= UNTIL, 

( 7) 



INY, SMATH 20 + STY, >TIB JSR, XSAVE LDX, 

( 8) 



>ST JSR, NEXT JMP, ;C 

( 9) 

CODE 

FOPR 

0 ,X LDA, HERE 18 + STA, 1 ,X LDA, HERE 14 + STA, 

(10) 



INX, INX, >F JSR, >A JSR, XSAVE STX, ST> JSR, 

(11) 



D0 LDA. FFFF JSR, >ST JSR. XSAVE LDX, F> JSR, 

(12) 



NEXT JMP, :C 








(13) CODE FUNCT O ,X LDA. HERE 13 + STA, 1 ,X LDA, HERE 0F + STA, 

(14) INX, INX, >F JSR, XSAVE STX, ST> JSR, FFFF JSR, 

(15) >ST JSR, XSAVE LDX, F> JSR, NEXT JMP, ;C —> 


SCRNH 44 

< 0> ( FlOTTANTS 4 ) 

( 1) CODE S->F XSAVE STX, ST> JSR, 0 .X LDY, 1 ,X LDA, 0499 JSR, 

( 2) XSAVE L.DX, >ST JSR, INX, 1NX, F> JSR, NEXT JMP, ;C 

( 3> CODE F->S >F JSR, XSAVE STX, ST> JSR, D92C JSR. XSAVE LDX, 

( 4) >ST JSR, 04 I OA, PIIA, D3 LOA, PUSH JMP, ;C 

( 5) CODE FDUP >F JSR, F> JSR, F> JSR, NEXT JMP, ;C 

( 6) CODF FSWAP >F JSR, >A JSR, F> JSR, A> JSR, NEXT JMP, ;C 

< 7> CODE FOVER >F JSR, >A JSR. A> JSR, F> JSR. A> JSR, NEXT JMP, ;C 

(8) : FDROP OROP DROP DROP ; 

(9) : F# 0 BL WORD HERE COUNT + C! HERE 1+ F9 ! (FIN) STATE 0 

(105 IF SWAP ROT 3 0 DO [COMPILE! LITERAL LOOP THEN ; IMMEDIATE 

(11) : INPUT# BIK @ >R IN P >R 0 BIK ! OUERY [COMPILE! F# 

(12) R> IN ! R> BLK ! ; 

(13) : F. (FOUT) l SMATH 20 + ! LITERAL COUNT TYPE SPACE ; 

(14) — > 

(15) 


SCRN# 45 

( 0) ( FLOTTANTS 5 ) 

(1) : F+ DB25 FOPR 


F- DB0E FOPR 

: Ft DCF0 FOPR ; 

(2) : F/ DDE7 FOPR 

(3) : LN DCAF FUNCT 


Ft E238 FOPR 
LOG DDD4 FUNCT 

: SOR E22E FUNCT ; 

(4) : EXP E2AA FUNCT 


COS E38B FUNCT 

: S IN E392 FUNCT ; 

( 5) : TAN E3DB FUNCT 


ATN E43F FUNCT 

: SGN DF21 FUNCT ; 

( 6) : INT DFBD FUNCT 


CHS E271 FUNCT 

: FABS DF49 FUNCT ; 

( 7) : FLOTTANT <BUILDS , , , DOES> ; 

(8) : F@ >R R 4 + @ R 2 + @ R> 0 ; 

(9) : F! >R R ! R 2 + ! R> 4 + ! ; 

(10) : REEL (BUILDS , , , DOES> F0 ; 

(11) F# 3.1415926535 REEL PI 

(12) CR EXTENSION FLOTTANTS CHARGEE * DECIMAL ;S 

(13) 

(14) 

(15) S. BRUNET et M. 

ZUPAN Nov. 85 
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( 0) ( CHAINAGE ARRIERE POUR COMPILER SOUS ASSEMBLER ) 

( 1) (1- Reperer la fin du dictionnaire ) 

( 2) FORTH VOC-LINK 0 LATEST HERE DUP DECIMAL 

(3) (2- Reserver assez de place pour l’application ) 

( 4) 2000 ALLO! 

(5) (3- Compiler ASSEMBLER et macros éventuelles ) 

( G) 30 LOAD ( si assembler en 30 ) 

(7) ( 4- Revenir en arriéré et compiler l’application ) 

(8) DP ! DECIMAL 41 LOAD 

(9) (la pile doit rester ‘'propre* ) 

(10) ( 5-. Chaîner le vocabulaire et "oublier* ASSEMBLER ) 

(11) PFA LFA ! VOC-LINK 0 ! 

(12) HERE FENCE ! 

(13) FORTH DEFINITIONS 

(14) : FICTIF : FORGET FICTIF 

(15) ;S 















Illustration: 



J RO N est devenu célèbre après son passage sur les 
écrans. Pour ceux qui ne connaîtraient pas le thème, 
= le voici résumé en quelques mots. 


BUT DU JEU 

Il s'agit de survivre le plus long¬ 
temps possible à bord d'une 
moto sans croiser ses propres 
traces, ni celles laissées par l'or¬ 
dinateur (pour de plus amples 
détails, se référer à la partie expli¬ 
cation du programme). 

MODE DE CHARGEMENT 

— Charger le programme TRON. 

— Le faire exécuter. 

— Le programme "TRON ASS." 
se charge durant l'exécution du 
programme chargé précédem¬ 
ment (il doit être placé après le 
programme "TRON"). 

COMMENT COPIER 
LES PROGRAMMES 

— Taper le programme "TRON", 
mais ne pas le faire exécuter. 

— Après vérification, le sauve¬ 
garder par CSAVE"TRON", 
AUTO. 


— Taper le programme "TRON 
2 ". 

— Après vérification des DATA, 
le faire exécuter par un RUN. 

— Le sauvegarder par CSAVE 
"TRON.ASS",A# 5000,E# 52BF 
(par mesure de sécurité, sauve¬ 
garder également le programme 
Basic par CSAVE"TRON 2”). 

— ATTENTION : Pour sortir du 
programme TRON, pour corriger 
des erreurs, ne pas se servir de 
la touche "A" au moment du 
menu, mais faire un RESET. 

ORDRE DE 

DEROULEMENT DU JEU 

— Présentation (inscription de 
TRON) + chargement de TRON 
ASS. 

— Affichage du menu : 

- jeu 

- explication 

- volume 

- scores 

- difficulté 

- arrêter. 


— Explication. 

— Volume et difficulté (utilisation 
de la routine en langage machine 

# 5000- # 5067). 

— Scores (uniquement les dix 
meilleurs). 

— Jeu : 

- initialisation (lignes 2040 à 
2090), 

- appel de la routine en langage 
machine en ligne 2100 (pour 
accélérer le jeu, diminuer le 
contenu de la case mémoire 

# 509F), 

- contrôles (vies, scores...), 

- dessin du terrain de la ligne 
3000 à 3220, 

- musique de 3290 à 3390. 

— Arrêter si vous êtes sûr de 
vouloir arrêter, l'ordinateur se ré¬ 
initialise entièrement. 

10 ROI 
20 RE H 
30 RE H 
40 REH 
50 REH 
60 RE H 
70 REH 
80 RE H 
90 REH 
100 REH 
110 REH 
120 REH 
130 REH 


! TRON 

! DROWROY & HOWER 
! Prograaae pour 

! 0RIC-At«os 

! Copyright 1985 

f--f 
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Inscription de TRON 


HO RELEASE:HIMEM #5000' 

150 IW< 3:PAPER 0:HIRES 
160 POKE I26A, 10 
170 m 1 
180 : 

190 REM 
200 REM 
210 REM 

220 i 

230 CORSET 40,50,1 ’ T 

240 DRAW 35,0,1:DRAW 0.10,1:DRAW -5,0.1:DRAW 0,-5,1 
250 DRAW -10,0,1:DRAW 0,30,1:DRAW 5,0,1:DRAW 0,5,1 
260 DRAW -15,0,1:DRAW 0,-5,l:DRAW 5.0,1:DRAW 0,-30,1 
270 DRAW -10,0,1:DRAW 0,5,1:DRAW -5,0,1:DRAW 0,-10,1 

280 î 

290 CURSET 80,50,1 ’ R 

300 DRAW 30,0,1:DRAW 5,5,1:DRAW 0,10,1:DRAW -5,5,1 
310 DRAW -5,0.1:DRAW 5,15,1:DRAW 5,0,1:DRAW 0,5,1 
320 DRAW -15,0,1:DRAW 0,-5,1:DRAW 5,0.1:DRAW -5,-15,1 
330 DRAW -10,0,1:DRAW 0,15,1:DRAW 5,0,1:DRAW 0.5.1 
340 DRAW -15,0,1:DRAW 0,-5,1:DRAW 5,0, lîDRAW 0,-30,1 
350 DRAW -5,0,1:DRAW 0,-5,l 
360 : 

370 CURSET 130,50,1 ’ 0 

380 DRAW 25,0. l-.DRAW 5.5,1 :DRAW 0,30,1:DRAW -5,5,1 
390 DRAW -25,0,1:DRAW -5,-5,l-.DRAW 0,-30,1 :DRAM 5,-5,1 
400 : 

410 CURSET 165,50,1 ’ N 

420 DRAW 10,0,1:DRAW 15,30,1:DRAW 0,-25,1:DRAW -5,0,1 
430 DRAW 0,-5,1:DRAW 15,0,1:DRAW 0,5,t:DRAW -5,0,1 
440 DRAW 0,30,1 : DRAW 5,0,1:DRAW 0,5,1:DRAW -10,0,1 
450 DRAW -15.-30,1:DRAW 0,25,1:DRAW 5,0,1:DRAW 0.5,1 
460 DRAW -15,0,1:DRAW 0,-5,1:DRAW 5,0.1:DRAW 0.-30.1 
470 DRAW -5,0,1:DRAW 0,-5,1 
480 : 

490 FOR If39176 TO 39215:READ A 
500 POKE I,A:NEXT I 

510 DATA #1F,13F,13F,#33,121,#21,#13,#0C 
520 DATA #3F,#3E,#3F,#3F,#3F,#3F,#3F,I00 
530 DATA #30,#18,#3C,132,#21,#21,(32,tOC 

535 DATA #22,#08,#20,#01.#10,#02,#10.#05 

536 DATA #1E,#3F,#1E,#1E.#1E.#1E,#3F.#3F 

540 SOUND 1,700,7:S0UND 2,1000,7:PLAY 3,0,7,1000 

550 CURSET 20,104,0:F1LL 10,1,6 

560 CURSET 20,125,0:F1LL 10,1,3 

570 CURSET 20,146,0:FILL 10,1,5 

580 A*=* Un jeu propose par : * 

590 Y=105:GOSUB 660:CURS£T 146,105,1:CURSET 147,105.1:CURSET 148,104,1 
600 A#=* Michel DROUVROY i Jerome HOUVER* 

610 Y=126:60SUÎ 660:CURSET 146,126,1:CURSET 147,126,1:CURSET 148,125,1 

615 CURSET 158,126,1:CURSET 159,125,1:CURSET 160,126,1 

620 A*=‘ Copyright 1985 

630 Y=147:G0SUB 660 

640 PLAY 0,0.0,0:GOTO 770 

650 i 

660 FOR 1= 0 TO 31 
670 CURSET 25*(I«6),Y,0:CHAR 33,0,1 
680 CURSET 25M(H1H6),Y,0:CHAR 34,0,1 
690 CURSET 25+((H2)*6),Y,0:CHAR 35,0,1 
700 WAIT 10 

710 CURSET 25+((H2)*6),Y.0:CHAR 35.0,0 

720 CURSET 25*(<H1H6),Y,0:CHAR 34,0.0 

730 CURSET 25*(1*6>,Y,0:CHAR 33,0,0 

740 CURSET 25-M 1*6),Y,0:CHAR ASCIMDHA», 1+1,1)),0,1 

750 MEUT 

760 RETURN 

770 : 

780 CURSET 111,170,0:CHAR 33,0,1 

790 CURM0V6,0,0:CHAR 34,0,1 

800 CURHOV 6,0,1 :CHAR35,0,1 

810 PRINT • PREPAREZ VOTRE MA6NET0PH0NE POUR LA’ 

820 PRINT • SUITE 1 

830 6ET Ai: CIOAD" 


Menu 


8*0 DIM SC(tl),NO*(ll):FORI=l TO llîSCIIHlOOO^HIH 1 D & H 
850 TE XT:POKE «BBA3,0:POKE#400.9:POKE#401,10 
860 : 

870 REM 
880 REM 
890 REM 
900 : 

910 CLS.-LORES 0:P0KE #26A,10:P0KE #BBA3,0 

920 PLOT 15,1,10:PL0T 16,!,2:PL0T 15,2,10:PL0T 16,2,3 

930 PLOT 17,1,’M E N U*:PL0T 17,2,*M E N U* 

940 PLOT 3,5,*— Touches —i-Fonctions- 1 

950 PLOT 2,5,1:PL0T 5,5,6:PL0T 13,5,1:PL0T 22,5,5:PL0T 32,5,1 

960 PLOT 6,7,*t J ) 1 Jeu 1 

970 PLOT 5,7.3:PLOT 15,7,1:PL0T 17,7,2 

980 PLOT 6,9, *C E I i Explication 1 

990 PLOT 5,9,3:PL0T 15,9,1:PL0T 17,9,2 

1000 PLOT 6,11,T V 1 ! Volume 1 

1010 PLOT 5,11.3:PLOT 15,11,1 :PLjOT 17,11,2 

1020 PLOT 6,13,*1 S 1 ! Score 1 

1030 aOT 5,13,3:PL0T 15.13.1 : PLOT 17,13,2 

1040 PLOT 6,15,‘t D 1 i Difficulté 1 

1050 PLOT 5,15,3:PL0T 15,15,1:PL0T 17,15,2 

1060 PLOT 6,17,’t A 1 ! Arrêter 1 

1070 PLOT 5,17,3:PL0T 15,17,1:PLOT 17,17,2 

1080 PLOT 4,20,5:PL0T 5,20,'Appuyez sur la touche choisie :’ 

1090 SET CH* 

1100 IF CHi^J 1 THEN 1950 

1110 IF CHM’E 1 THEN 1200 

1120 IF CH$= 1 V THEN 1450 

1130 IF CHt^’S" THEN 1850 

1140 IF CH*='D" THEN 1450 

1150 IF CHtï’A 1 THEN 1160 ELSE 1090 

1160 PLOT 4,22.6:PL0T 5,22,'Etes vous sure de vouloir arrêter ’’’ 
1170 SET Rt 

1180 IF R*= 1 0 1 THEN CALL#F88F ELSE 900 
1190 : 

1200 REM 
1210 REM 
1220 REM 
1230 : 

1240 CLS:LORES 0 
1250 INK 5:POKE #26A,10 

1260 PLOT 15,1,10:PLOT 16,1,1:PL0T 15,2,10:PL0T 16,2,6 
1270 PLOT 17,1,"T R 0 NMPLOT 17,2,*T R 0 N 1 
1280 PLOT 3,5,'Le principe du jeu est de tenir le 1 
1290 PLOT 2,7,'plus longtemps possible en évitant 1 
1300 PLOT 2,9,Me bolide fou qui n'a qu'un but: vous 1 
1310 PLOT 2,11,'percuter afin de vous détruire. 1 
1320 PLOT 3,13,'Mais, pour augmenter la difficulté 1 
1330 PLOT 2,15,'votre *oto laisse derrière elle une 1 
1340 PLOT 2,17,'traînée qui vous sera mortelle si 1 
1350 PLOT 2,19,'vous la croisez. 1 
1360 PLOT 3,21,'Attention aux obstacles et aux 1 
1370 PLOT 2,23,'limites du terrain. 1 
1380 PLOT 3,25,'Utilisez les touches flechees. 1 
1390 SET R* 

1400 GOTO 900 
1410 : 

1420 REM 
1430 REM 
1440 REM 
1450 : 

1*60 CLS:IW< 4:PAPER 6 
1470 HIRES:INK 1:PAPER 6:P0KE #26A,10 
J480 CURSET 35,50,1:DRAW 0,149,1:1=0 
1490 FOR Y=190 TO 50 STEP-10:1=1+1 
1500 CURSET 35,Y,1:DRAW 5,0,1 
1510 I*=STR*(I):F0R J=0 TO LENI 1*1-1 
1520 CURSET 45-MJ*6),Y-3,0:CHAR ASC(MID*tI*,J+l,111,0,1 
1530 KCXT J:ÆXT Y 
1540 IF CH4='V 1 THEN A*=’ VOLUfE 
1550 IF CHJï’D* T)€N A*=*DIFFICULTE 
1560 CURSET 70,39,1:FILL 70,1,4 


Explication 


Volume et difficulté 


t DMNEXT 
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1570 

1580 

1590 

1600 

1610 

1620 

1630 

1640 

1650 

1660 

1670 

1680 

1690 

1700 

1710 

1720 

1730 

1740 

1750 

1760 

1770 

1780 

1790 

1800 

1810 

1820 

1830 

1840 

1850 

1860 

1870 

1880 

1890 

1900 

1910 

1920 

1930 

1940 

1950 

1960 

1970 

1990 

1990 

2000 

2010 

2020 

2040 

2050 

2060 

2070 

2080 

2090 

2100 

2110 

2120 

2130 

2140 

2150 

2160 

2200 

2210 

2220 

2230 

2231 

2232 

2235 

2236 
2240 
2245 
2250 
2260 
2270 
2280 


FOR 1=1 TO 12:CURSET 100+(1*6),40,0 
CHAR ASC(HID*(A*,I,1)),0,1:NEXT 1 
A*='Reglage avec les' 

FOR 1=1 TO 16:CURSET 91*(1*6>,60,0 

CHAR ASC(MID*(At,I,1)1,0,1:NEXT I 

curset 104,60,1 

CURSET 105,60,1 

CURSET 106,59,1 

At=*touches flechees.* 

FOR 1=1 TO 17:CURSET 88*(I»6),80,0 

CHAR ASC(MID*(A*,I,1>),0,1:NEXT 1 

CURSET 155,BO,I 

CURSET 156,80,1 

CURSET 157,79,1 

CURSET 173,80,1 

CURSET 174,80,1 

CURSET 175,79,1 

A$=’Espace pour finir.' 

FOR 1=1 TO 18:CURSET 85-MI*6), 100,0 
CHAR ASC(MID*(A*,I,1)),0,lîNEXT I 
POKE #5003,*C7:CALL»5C25 

IF CH*='V' THEN POKE *400,15-INT1IPEEK(#5003>-50>/10) 
IF CH*='D* THEN POKE *401,INTI<PEEK(*50Û3I-50I/10H1 
6OT0 900 

REH ! 1 ! 

REM î ! ! Scores 

REH ! ! ! 

CLS:LORES 0:P0KE I26A,10:P0KE IBBA3.0 

PLOT 14,1,10:PLOT 15,1,3:PL0T 14,2,10:PLOT 15,2.6 

PLOT 16,1,'S C 0 R E S':PLOT 16.2,'S C 0 R E S' 

PR INT :FRINT:PRINT:PRINT:PRINT 
FOR 1=1 TO 10 

PRINT TAB151SCII)tTA8(l5)CHRt(27)'E'N04(I) 

PRINTîfCXT 
6ET R*:SOT0900 
: 

reh : : : 

REH ! 1 ! Jeu 

reh : : : 


VI=3:SC=0:INK6:PAPER6 
CLS:HIRES:POKE I26A.10 
INK 4:PAPER 6 

GOSUB3ÛOO ' Dessin du terrain 


2290 SOUND 1,0,0:60T01850 
3000 : 

3010 REM 1 1 ! 

3020 REM * ! ! Dessin du terrain 
3030 REH ! 1 ! 

3040 : 

3050 CURSET15,10,1 

3060 DRAW 95,0,1:DRAW 10,20,1:DRAW 10,-20,1 
3070 DRAW 95,0,1:DRAU 0,80,1:DRAU -20,10,1 
3080 DRAW 20,10,1:ORAW 0,B0,1:DRAW -95,0,1 
3090 DRAW -10,-20,1:DRAW -10,20,1:DRAW -95,0,1 
3100 DRAW 0,-80,1:DRAW 20,-10,1:DRAW -20,-10,1 
3110 DRAW 0,-80,1 
3120 CURSET120.70,1 

3130 DRAW 10,20,1:DRAW 20,10,1:DRAW -20.10,1 
3140 DRAW -10,20,1:DRAW -10,-20,1 : DRAW -20,-10,1 

3150 DRAW 20,-10,I:DRAU 10,-20,1:VI*=" 

3151 CURSET 103,97,3:CHAR 84,0,1:CURMOV 9,0,3:CHAR 82,0,1 

3152 CURHOV 9,0,3:CHAR 79,0,1:CURHOV 9,0,3:CHAR 78,0,1 
3155 FORI=lTOVI:VI*=VI*t’ X'iNEXTI 

3160 PRINTTAB(4)'SCORE VIES HI-SCORE' 

3170 PRINTTAB(3)STR*(SC);TAB(17JVI*;TAB(29)STR$(SC<1)) 

3180 PRINTTAÎ(3)STR*(SC)jTAÎI17)VI*;TAB(29)STRt(SC<1))j 

3190 POKE49001,16:P0KE49039,22:P0KE49041,16:P0KE49O79,22:P0KE49081,16 

3195 POKE 49119,22 

3200 POKE 49002,2:P0KE 49014,3:P0KE 49026,5 


3210 

3220 

3260 

3270 

3280 

3290 

3300 

3310 

3320 

3330 

3340 

3350 

3360 

3370 

3380 

3390 


POKE 49042,1:P0KE 49043,10:POKE 49054,4iP0KE 49066,7 
POKE 49082,1:P0KE 49083,10:POKE 49094,4:P0KE 49106,7 


REH ! I S Musique de début 
i 

V=PEEK(#400> 

FOR 1=600 TO 100 STEP -10 

SOUND 1,1,V 

SOUND 2,600-1,V 

PLAY 3,0,7,1000 

NEXT 1 

CURSET1,1,1 

SOUND 1,700,V 

SOUND 2,1000, V 

PLAY 3,0,7,1000 

RETURN 


10 : 



POKE#5087,IDC:P0KE#5089,#1E ’ Coor. départ du joueur 

POKE#511B,*14:POKE#511D,#AA ’ Coor. départ de l’atnos 

P0KE#404,0 ’lnit. accident j. 

PCKEI40C,0 ’lnit. accident a. 

P0KEI402,#AC 'Direction de départ pour le joueur 
DOKEI4OA.0 ’lnit. du compteur 
CALL#507C 'Lancement de l’ass. 

IFPEEK(14041=1 TIENCURSET PEEK<*5087)-2,PEEK(#5089>-4,1 : CHAR 36,0.1 

IFPEEK(I40C)=1THENCURSETPEEK(I511B)-2,PEEK(I511D1-4,1:CHAR36.3,1:CALL*5?B0 

IF PEEK1*4041=1 THEN VI=VI-1 

SC=SCrD£EK(*40A):WA1T200 

IF VI=0 THEN 2200 

UAIT200:60T02000 

IF SOSC(IO) T)€N X=10 EL SE 1850 
REPEAT:X=X-1 


20 REM ♦-1 

30 REH 1 ! 

35 REM 1 TRON { 

40 REM 1 ! 

45 REH 1 Partie en assembleur 1 

50 REH 1 ! 

55 REM 1 Copyright 1985 ! 

60 REH 1 ! 

65 REM 1 HOUVER K DROUVROY 1 

70 REM 1 ! 

75 REH <-► 

80 : 

90 : 

100 FORI=#5000T0#5067: READA* : POKE I, VAL CI'*A1):NEXTI 
110 : 


IF SOSC(X) Tt£NSCUtl)=SCU):NO*<Ul)=NO*U> 
UNTIL 1=0 OR SC<SC<X):X=XH:SC(X)=SC 
PRINT CHRSI13) 

CLS:PRINT 

POKE 49001,16:P0KE 49039,22:P0KE49O41,16 

POKE 49079,22:P0KE49081,16:P0KE 49119,22 

INPUT ' Quel est votre preno» ';NO*(X) 

V=PEEK(*400):PLAY1,0,0,0 

FOR 1=200 TO 20 STEP -10 

FOR J=1 TO 5 

SOUND 1,I+(J»10I,V 

NEXT J,J 


120 : 


150 F0RI=*5O7CTO#5106:READA*:POKEI,VAL('* 1 ' *A*1 :NEXTI 
160 : 


170 : 

180 FORI=*5107T0#5107:POKEI,*EA:NEXTI 
200 FORI=#5108TO#516A:R£ADA*:POKEI,VAL('*'+A*):NEXT1 
210 : 

220 : 

250 F0R1=#516BT0#5198:READA*:POKEI,VAL('#'*A* >:NEXTI 
260 : 

270 : 

300 F0RI=*5199T0Ï51F2:READA*:POKEI,VAL(‘•'*A*):NEXTI 

















Déplacement atmos 
2 e«e partie 


310 : 

320 : 

350 FORIM51 rlTOI5247 : READA* : ROKEI, VAU * I' +A* ) ;NEXTI 
360 : 

370 s 

400 F0RI=t5248T0#525A:READAt:P0t'EI,VAl( '•* +A*) :N»EXTI 
410 : 

420 î 

450 FOR I =*526OT0#52A3 : READA* : POKE I, VAL ( * « 1 ’ ) : NEXTI 

460 : 

470 s 

500 F0RI=#52B0T0#52B7 : READA* : POKE!, VAL( ’lt'+AS) tfiEXTI 
510 : 

520 : 

1000 : 

îooi rem : : : 

1002 REM ! ! ! Replace du volume 

1003 REM ! ! ! et du niveau de 

1004 REM ! ! ! difficulté. 

1005 REM 1 ! ! 

1006 : 

1010 DATA A2.OC,AO,C7,SE,El,02,8C,£3,02,A9,01,BD,E5,02,20,08,FO 
1020 DATA A9,12,8D,E1.02.A9,00,B3,E3,02,A9,0!,8D,E5,02,20,10,Fl,60 
1030 DATA AD.08,02,09,B4.DO.15 

1040 DATA AD,03,50,C9,C7,FO,Œ,A9,00,8D,OB,50,8D.1D,50,20,00,50,EE,03,50 
1050 DATA AD,08,02.09,90,DO,15 

1060 DATA AD,03,50,C9,32,FO,0£,CE,03,50,A9,01,8D,OB,50,8D,10,50,20,00,50 
1070 DATA AD.08,02.09,84,DO,01,60.40,25.50 

1500 : 

1501 REM i ! 1 

1502 REM ! 1 ! Déplacements joueur 

1503 REM 1 1 ! 

1504 : 

1510 DATA AD,08,02,09,38,FO.03.80,02,04,A2,DC,AO,!E,8E.E1,02,8C,E3,02 
1520 DATA A9,01,8D,E5,02,20,08,FO 

1530 DATA AD,01,04,8D,03,04,A9,FF,EA,EA.EA,E9,01,C9,0O,F0,03 

1540 DATA 40,AO,50,CE,03,04,A9,00,CD,03,04,FO,03.40,9E.50 

1550 DATA AD,02,04,09,90,DO,04,88,40,E8,50 

1560 DATA AD,02,04,09,B4,DO,04,08,40,EB,50 

1570 DATA AD,02.04,09,AC,DO,04,CA,40,E8,50 

1580 DATA AD,02,04,09,BC,DO,04,E8.40,E8.50,40,07,51 

1590 DATA BE,87,50,80,89,50,6E,El,02,80,E3,02,20,08,Fl 

1600 DATA AD,El.02.09,FF,D0,09,20.BO,52.A9,01,80,04,04.60 

2000 : 

2001 rem : : : 

2002 REM ! ! ! Déplacement atmos 

2003 REM ! ! ! 1 ere partie 

2004 REM 1 ! ! 

2005 : 

2007 DATA A9,00,8D,4A,52 

2010 DATA EE,OA,04,AO,OA,04,09,00.DO,03,EE,OB,04 

2020 DATA A2,14,AO.AA,3E,El,02,8C,E3.02.A9.01,SD.E5,O2.20,C8.F0 

2030 DATA 8A.CD,B7,50.90.0B.6D.06.04,A9.04 

2040 DATA 8D.07,04,4C,4B,51.AD,87,50,ED.1 B,51.60,06.04,A9.02.8D.07.04 
2050 DATA 98,CD,89,50,90.0B,8D,08.04,A9,01 

2060 DATA 8D,09,04,40,6A,51.AD,89.50.ED,1D,51,80.08,04.A9,03,80.09,04 
2500 : 


2501 REM î 

2502 REM ! 

2503 REM ! 

2504 REM 1 

2505 : 

2510 DATA AD.06,04,CD,08,04,80,15.AD,09,04,09,01.DO,06.80.05,04,40,99.51 
2520 DATA A9.03,80.05,04,40.99,51 

2530 DATA AD.07,04,09,02,DO,06,8D,05,04,40,99,51.A9,04,BD,05,04 

3000 : 

3001 REH 11 ! 

3002 REM ! ! ! Déplacement ataios 

3003 REM ! ! î 3 eme partie 

3004 REM : ! : 

3005 : 

3010 DATA 20,60,52,A9,FF,CD,El,02,FO,03,40,70,50 

3020 DATA AD.O5,04,C9,01.D0,0D,C8,8C.lD.51,AD,07,04,8D,05,04,4C.F3,51 

3030 DATA AD,05,04,C9,02,DO.OD,CA,8E.1B,51,AD,09,04,8D.05,04,4C,F3,51 

3040 DATA AD,05,04,09,03,DO,OD,88,80,1D,51,AD,07,04,80,05.04,40,F3,51 

3050 DATA AD.05,04.C9,04,D0,0A,E8,8E,1B,51,AD,09,04,8D,05,04 

35X : 

3501 REM ! ! 1 

3502 REH ! ! 1 Déplacement atmos 

3503 REM 1.1 ! 4 eme partie 

3504 REM ! 1 i 

3505 i 

3510 DATA 20,60,52,A9,FF,CD,El,02.FO,03,40,70,50 
3520 DATA AD,05,04,09,01,DO,OC,08,BC,1D,51,A9,03,80,05,04,40,49,52 
3530 DATA AD,05,04,09,02.DO.OC,CA,8E,IB,51,A9,04.8D,05,04,40,49,52 
3540 DATA AD,05,04,09.03,DO,OC,88,BC.1D,51,A9,01,80,05,04,40,49,52 
3550 DATA AD,05,04,C9,04,D0,09,EB,8£,1 B.51,A9,02,80,05,04 

4000 : 

4001 REH ! 1 i 

4002 REM ! ! ! Déplacement atmos 

4003 REH ! ! ! 5 eme partie 

4004 REM 11 i 

4005 : 

4010 DATA A9,OO,C9,05,BO,06,EE,4A,52,4C,99,51,A9,01 
4020 DATA 8D,OC,04,60 

4500 l 

4501 REM î ! 1 

4502 REM ! 1 ! Déplacement atmos 

4503 REM 1 1 ! sous-programme 

4504 REM î ! ! 

4505 : 

4510 DATA AD.05,04,09,01,DO,04,B8,40,B9,52 
4520 DATA AD,05,04,09,02,DO,04,E8,40.89.52 
4530 DATA AD.05,04,C9,03.DO,04,C8,4C,B9,52 
4540 DATA AD.05,04,09,04.DO,01,CA 
4545 DATA A9.00,8D,E2,02 

4550 DATA 8E.1B.51.8C,1D,51.8E,El.02,BC.E3.02,20.C8,F1 
4560 DATA AE,1B.51,AC,10,51,60 

5000 : 

5001 REM ! ! 1 

5002 REM ! i ! Bruit d’explosion 

5003 REM ! ! 1 

5004 : 

5010 DATA A2,14,AO,El,20,86,FA,60 


Le programme a été développé 
sur ATMOS et n'est pas compa¬ 
tible ORIC-1. Les auteurs suggè¬ 
rent les modifications suivantes : 
Ligne 1180 imodifier le CALL 
#F88F en CALL# F42D. 

Pour la partie en assembleur, 
voici la procédure à suivre. 
Charger la partie code machine 
(ou le programme Basic permet¬ 
tant de l'implanter ; dans ce der¬ 
nier cas, faire RUN). 


Quand le code machine est 
implanté, faire la série de DOKE 
suivants : 

DOKE #5010, # F02D (Curset) 
DOKE #5096, #F02D (Curset) 
DOKE # 512A, # F02D (Curset) 
DOKE #5022, #F079 (Draw) 

MODIFICATIONS ORIC-1 

1180 IF Ri='0* THEN CALLIF42D ELSE 900 


DOKE # 50F5, # F141 (Point) 
DOKE # 529B, #F141 (Point) 
DOKE # 52B5, #FA6C 
Puis : 

CSAVE"TRON ASS”, A# 5000, 
E# 52BF. 


1510 I$=STR»(I):I$=RI6HT*(I*.LEN(I$)-1):F0R J=0 10 LEN(I$)-1 
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-utilitaire 


OUVREZ LES FENETRES! 


10 * 

K) I NDOW 

20 • 


30 * 

Entrée des DOTAS 

40 * 



50 CLS:LIGNE*100:C=1îCHKS=00 
55 FOR I=#9E00 TO #995F 


F rédéric TARAUD, l'autour du programma, 
nous a transmis uno vorslon amélioré* du lis¬ 
ting pormottant l'ontréo dos DATA. 

Dans co cas, los modifications ORIC- T sont récdlséos 
automatlquomont. 


60 REfiD Dt:D=VfiL<"#"+Dt)!CHKS=CHKS+D*C:C=C+1:POKE I.D 


75 

£0 

£5 

90 

95 

93 

93 

100 

110 

120 

150 

160 

150 

1E0 

170 

1£0 

193 

200 

210 

220 

250 

260 

250 

2£0 

270 


IF C=23 THEN PRINT"L i 9ri? “îLIGNE;" CHKS=” tCHKS :LIGNE=LIGNE+10 :CHKS=0: C= 1 
NEXT 

IF PEEKCttEABE) O ttfi2 THEN GOSUB 2E0 

PRINT"TdPe-r S cour sauv$r*àutre toucha pour arrêter"!: GET fit 
IF fit O"S" THEN END 

CSfiVE"Wi ndow". fitt9£00. EP995E. OUTOtEND 


DfiTfi 

DfiTft 

DfiTfi 

DfiTfi 

DfiTfi 

DfiTfi 

DfiTfi 

DfiTfi 

DfiTfi 

DfiTfi 

DfiTfi 

DfiTft 

DfiTfi 

DfiTfi 

DfiTfi 

DfiTfi 


03 . 11 . 
00. 00. 
55. 99. 
fi9. 09. 
£9. ££. 
01 .££. 
06, £D. 
05.00. 
99. fi5. 
07. SD. 
20. 25. 
Efi, 00. 
01. DO. 
99. E£. 
£5.0E. 
1E. £5. 


ED. F5. 
09. 06. 

DO. DP. 
20. 26. 
£5. 06. 
C9,63, 
6E. 99. 
1E.ED, 
01.1E. 
EE. 99. 
99. fl0. 
03, 20. 
ED, E0. 
E6.01, 
CE. PI. 
00. £5. 


02 . 09 . 
£5.03. 
CE. 20. 
DF, fl9. 
09. 99. 
D0. 1D. 
CE. PI, 
E6. 99. 

ED. E3» 
91.06. 
00. B1 . 
25. 99, 
00. 05. 

DO. ED. 
06, £5. 
0E, 90. 


93.ED.FE. 
6C.29,93, 
E2, 00, C6, 
5F. 00. 99. 
£5. 05. 90. 
00.00. B1. 
06.ED.E7. 
C9, 29. 90. 
99. C9, 1D. 
CS, 05. 20. 
02,91.08, 
00, 00. B1. 
20. 25. 99. 
E0. 02. 00. 
07.E0.fi5, 
03.EE.07, 


02. E0. 6C. 
C9. 43.D0. 
0S. D0. F3. 
20. ED. DC. 
02. EE.05. 
04.C9.01. 
99. 4C. 0C. 
03. 4C, 3E. 
B0. E9. Efi. 
SD, E7. 99. 
C3.C4.0O. 
06.91,02. 
00. 00. B1. 
Efi. OD. EE. 
02.ÎE.E9. 
1E.60.4F. 


70. D0. 
ES. 00. 
20, 03. 
20, CB, 
00.01, 
F0,01, 
99, 20. 
D3. 20. 
20. 0C. 
91,06. 
D0. F7. 
CS.C4* 
06,91. 
99. E5. 
2S. E5. 
50. 45. 


4C. 36. 
04,09. 
CF, 02. 
DS. EC. 
B1.06, 
£0. 09. 
£5. D0. 
E5.DO. 
Dfi. 05. 
09.01. 
20. 3C. 
00. D0, 
02.CS. 
02. OD. 
02.90. 
4E. 43. 


D3. 4S, C9 
09, £5.03 
5F. 00. 99 
5E. 99. P0 
£5,00.CE 
00 . 91,06 
20.CS. DS 
20.CS. DE 
1F, 1E. ED 
00. 00.91 
93. EE. E4, 
F7.20, 3C 
C4. 00.D0 
E7. 99. £5, 
03. EE. 03, 
4C. 4F. 53, 


4F. D0. 
EE. 63. 
20, OD. 
BS. Efi. 
B1.06, 
fiO. 07. 
EE. 66. 
ES. SE, 
64. 99. 
04,00, 
01 . DO. 
99.ES, 
F7.20. 
03.Bl. 
1S. 05. 
65,00, 


09 

D9 

DE 

1E 

85 

Bl 

93 

E5 

ftD 

05 

ED 

E4 

3C 

04 

K 

00 


Modifications ORIC-1 


2Ë0 ' 

290 D0KER9S0C. RCFE4 ! DOKER930F. MB200 : D0KEP9S39. «1CE77 : DOKEtt9S60. ttDEOS 
300 D0KEW9E45. «DF15iD0KEti934C. RDCB7: D0KER934F, ttD310:DOKEt*9E92. PCFD3 
310 D0KER9395. «DS0D:DOKEP9Sfi5. RD2fi0:DOKER9SOS. ttC*D9: DOKERSSfiB. RDS0D 
320 DDKER93BD. RD9E5 
330 RETURN 


(Domlor oplsodo I) 


CHOCRSUm ! 


L • sr.e 

100 

CHKS= 

30244 

L • sne 

110 

CHKS= 

27952 - 

L i 9r.e 

120 

CHKS= 

346271- 

L 1 9 ne 

130 

CHKS- 

365211 

L i 9r.e 

140 

CHKS= 

24792 

L i 9ne 

150 

CHKS= 

26675 

L • 9ne 

1E0 

CHKS® 

31693 

L • 9ne 

170 

CHKS= 

32762 

L • 9ne 

1E0 

CHKS= 

26909 

L • 9 ne 

190 

CHKS= 

22860 

L i 9r.e 

200 

CHKS= 

35964 

L i 9ne 

210 

CHKS= 

33721 

L i 9ne 

220 

CHKS= 

27517 

L i «ne 

230 

CHKS= 

2S74E 

L i 9ne 

240 

CHKS= 

19153 

L i 9ne 

250 

CHKS= 

15739 


STOP ... ON NE JOUE PLUS 


LM+ 


Edit-Plus 

L'éditeur pleine 
page et le 
Basic français. 

Idéal pour 
l'apprentissage et 
l'enseignement 
du Basic 


Le compilateur qui permet l'exécution 
à la vitesse du langage machine 
de vos meilleurs programmes Basic. 


95 F 


75 F 


Les travaux pratiques du langage 
machine de iOric-Atmos. 

André Chénière 

Le livre d'un spécialiste 
pour les non initiés 

120 F 


AS DES AS 


L'assembleur et le 
désassembleur 
indispensables 
pour programmer 
efficacement 
en langage machine 


ORISCRIBE 


150 F 


75 F 


Le traitement de texte adaptable à toute imprimante. 

Déplacement, insertion, suppression, visualisation en 80 colonnes, tout devient possible 


Ote 

DESIGNATION DES PRODUITS 

PRIX 

UNITAIRE 

PRIX TOTAL 








+ 



SOUS TOTAL 


CD 

Règlement contre-remboursement (France Métropolitaine seulement) ♦ 30 F 

+ 

CD 

Participation aux Iras de port et emballage 5% du sou6-totaJ 

+ 

□ 

Participation aux Iras de port Edition 10 % du sous total 

+ 

Colis de plus de 5 kg expédiés par transporteur en port dû 

TOTAL 

- 


Le* prix sont donné* TTC 
dan* la llmll* des atocka dlaponlble* 


Nom : 

Prénom : 
Adresa* : 
C.P. el Villa: 
Téléphone: 
date : 
signature : 


BON DE 
COMMANDE 
A : 


ISOSOFT 

BP 22 
Mûra-Erlgné 
4913# 

Les Ponts-de-Cé 
TEL 41.57.77.11 
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bancd'essai 



LA CARTE 256 
COULEURS 
MICROFUTUR 


V ous ôtes las de voir toujours les mêmes couleurs sur 
votre écran, de ne pouvoir donner à l'herbe de la prai¬ 
rie le vert tendre du printemps, et à la bergère qui s'y pré¬ 
lasse un rose vif sur ses joues. Cette époque est révolue : 
votre ORIC dispose désormais d'une palette de 256 cou¬ 
leurs pour agrémenter vos chefs-d'œuvre. 



L'extension 256 couleurs de 
MICROFUTUR se présente sous 
l'aspect d'une petite boîte noire, 
se raccordant d'un côté sur le bus 
extension de l'ORIC, de l'autre 
sur la prise RVB. Elle vous permet 
de choisir 8 couleurs parmi 256. 
ATTENTION ! il n'y a pas affi¬ 
chage simultané de 256 cou¬ 
leurs I Elle va surtout intéresser 
les amateurs de beaux dessins... 
Vous croyez que cette interface 
va croquer quelques précieux 
octets de la mémoire de votre 
machine ? Vous vous trompez : 
la carte est bien pensée, et son 
adressage utilisant une partie de 
la ''page 3” ne va pas interférer 
avec le MICRODISC ou le JAS¬ 
MIN. A l'origine, la carte est 
câblée pour répondre aux adres¬ 
ses situées entre #3C0et #3C7. 
En coupant les straps d'origine, 
et en les disposant différemment, 
cette plage d'adresses est modi¬ 
fiable. 

Les 8 couleurs sont donc asso¬ 
ciées à 8 registres, 3C0 à 3C7. 
Ils correspondent respectivement 
aux ordres PAPER 0 à 7 (ou INK). 
A la mise sous tension de l'en¬ 
semble, devant un écran tout 
noir, vous risquez bien de croire, 
comme cela nous est arrivé, que 
quelque chose ne marche pas ! 
En plaçant une valeur entre 0 et 
255 dans un registre, on définit 
une couleur et vous allez voir que 
c'est assez simple. 

Le registre (8 bits) pourra être 
présenté comme sur le tableau 1. 


BLEU 

\-^l 


VERT 

I 1/2 | 1/4 


ROUGE 

1 | 1/2 | 1/4 | 


Bit 


7 

128 


6 

64 


5 

32 


4 

16 


2 

4 


0 

1 


Tableau 1 


Vous savez qu'en mélangeant 
soigneusement les 3 couleurs 
Rouge, Vert, Bleu, on peut obte¬ 
nir toutes les autres couleurs. 
Cette synthèse sera programmée 
en jouant sur les différents bits de 
chaque registre. 

Voyons avec quelques exem¬ 
ples : 

Pour obtenir un 100 % de bleu, 
il faudra que le bit 7 (et lui seul) 
de l'octet soit à 1. 

POKE #3C1,64 va donner un 
bleu beaucoup plus foncé (le bit 
6 seul est à 1 ). 

Jouons au peintre : 100 % de 
bleu et 1/2 de rouge (pas du 
Beaujolais, bien sûr), égale un 
violet clair. La valeur à mettre 
dans le registre est bit 7 plus bit 


1 (128 + 2)= 130. 

Vert plus un peu de rouge 32 + 4 
donnera un jaune. 

Vous voulez faire un joli teint rose 
proche de la couleur de la chair ? 
La notice fournie avec l'extension 
suggère la valeur 174. 

Notre extension nous a été livrée 
avec une disquette de démons¬ 
tration, tournant sur Jasmin. Elle 
prouve qu'il est facile de simuler 
le crépuscule ! 

Côté hard, on peut dire que la 
réalisation est soignée. Les 
composants sont montés sur un 
circuit en époxy, double face, à 
trous métallisés. Au cœur du 
montage, une RAM statique 1 28 
octets de chez MOTOROLA. 

Si vous devez utiliser cette exten¬ 
sion en même temps que le Jas¬ 
min, il sera nécessaire de prévoir 
un connecteur d'adaptation, une 
carte mère ou l'ampli-bus. Par 
contre, avec le MICRODISC, pas 
de problème puisqu'il y a un 
connecteur intermédiaire sur la 
nappe de liaison de celui-ci. 

Si le Père-Noël doit vous faire un 
cadeau et que vous n'avez pas 
encore choisi ; si le choix des 
couleurs est important pour vous, 
cette extension pourra vous 
combler ! 
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L e programme BYTES va vous 
permettre de connaître à tout 
instant le nombre d'octets restant 
libres. Ce nombre sera affiché à 
chaque apparition du Ready (par 
exemple, après un LIST si vous 
êtes en train de programmer). 
Son principe est simple : l'affi¬ 
chage du Ready est tributaire 
d'un saut implanté en RAM qu'il 
est aisé de modifier. Le détourne¬ 
ment du Ready pourra permettre 
l'exécution d'une routine, dont 
l'adresse sera indiquée à l'ORIC 
en 1 B. 


Pour le reste, le programme 
appelle peu de commentaires. On 
calcule le nombre d’octets res¬ 
tant libres entre le haut de la zone 
des variables que l'on connaît 
grâce à un pointeur système 
implanté en AO, et le sommet de 
la mémoire disponible (sous 
HIMEM), indiqué par le pointeur 
A6. Une simple soustraction à 
effectuer, et le tour est joué ! Le 
nombre converti en flottant est 
affiché sous forme de chaîne de 
caractères, grâce à des routines 
de la ROM (ceci explique l'exis¬ 


tence des deux versions, ORIC-1 
et ATMOS). 

Seule la version ATMOS a été 
désassemblée et commentée, par 
contre, les deux listings Basic 
vous sont fournis. Voici les rou¬ 
tines équivalentes : 


ATMOS 

ORIC-1 

DF31 

DF22 

CCBO 

CBED 

F865 

F82F 

E0D5 

E0D1 


L'utilisation du programme est 
simple. Taper RUN, il implante la 
routine langage machine et posi¬ 
tionne HIMEM. Par la suite, vous 
pourrez effacer le programme 
Basic, seule la routine machine 
devant demeurer en mémoire 
Pour l'essayer, vous pouvez cre^r 
quelques DIM en mode direct, et 
vous verrez l'affichage du nom¬ 
bre d'octets diminuer. 


9700 

A9 

OA 


LDA 

4» OA 

Détournement de l'affichage du "Ready " vers 

972A 

B5 

DI 


STA 

• DI 


9702 

85 

IB 


ST A 

♦ IB 

la routine Bytes. 

972C 

86 

D2 


STX 

4D2 

Effectue le calcul et crée la chaîne dans le but 

9704 

A9 

97 


LDA 

**97 

9 70A 

972E 

A2 

90 


LDX 

4 4 90 

fer accu flottant 

9706 

85 

IC 


STA 

» IC 


9730 

38 



SEC 



9708 

60 



RTS 



9731 

20 

31 

DF 

J SR 

4DF31 


9709 

EA 



N OP 



9734 

20 

DS 

EO 

J SR 

SE0D5 


970A 

20 

BO 

ce 

J SR 

t CCBO 

Affichage "Readv” 

9737 

A2 

OF 


LDX 

• 40F 

Affichage sur la ligne 0 de l'écran à partir de 

970D 

A9 

IA 


LDA 

441 A 

Affichage d une séné de 5 blancs pour effacer 

9739 

20 

65 

F8 

J SR 

4F865 

la coonne désignée par le registre X. 

970F 

AO 

97 


LDY 

4497 

le nombre d'octets précédent 

973C 

A9 

46 


LDA 

4 446 


971 1 

A2 

10 


LDX 

41 10 

Ecriture sur ligne supérieure de l’écran 

973E 

AO 

97 


LDY 

4497 


9713 

20 

65 

F8 

J SR 

4F865 

9740 

A2 

15 


LDX 

• 4 15 

Affiche à la suite. Bytes Free 

9716 

4C 

20 

97 

JMP 

49720 


9742 

4C 

65 

F8 

JMP 

4F865 


9719 

EA 



NOP 



9745 

60 



RTS 



97 1 A 

20 

20 

20 




9746 

20 

42 

79 




97 1D 

20 

20 

00 



Calcule le nombre d octets restant libres entre 

9749 

74 






9720 

AS 

A6 


LDA 

*A6 

97 4 A 

65 

73 





9*7 oo 

38 



SEC 


la tin du programme (fin zone variables ooev 

974C 

20 

46 

72 




9723 

ES 

AO 


SBC 

4 AO 

têe par A0I et le haut de mémoiro RAM Ipoirné 

974F 

65 

65 





9 7 

AA 



TAX 



9751 

00 






9726 

A5 

A7 


LDA 

4A7 









9728 

ES 

Al 


SBC 

SA 1 


LISTING DESASSEMBLE 





0 REM BYTES.BAS (ORIC-1) 

10 DATAA9.0A.85.IB.A9.97.85,1C.60,EA.20.ED.CB.A9.1A.AO 

15 DATA97,A2,10,20,2F,F8.4C.20.97.EA,20,20.20.20.20.00 

20 DAT A AS . A6.38 . E5 . AO . AA . A5 . A7. E5 , A1 

30 DATA85.D1.86,D2.A2.90,38.20,22.DF 

40 DATA20.D1.E0.A2.0F,20,2F.F8 

50 DATAA9.46.AO.97.A2.15.4C,2F.F8,60 

60 DATA20.42.79.74,65.73,20,46,.72.65.65,0 

90 HtMEM*96FF:FORN=«970OTO«9751 

95 READI 4 : I = VAL<"#"♦!») : F-OKEN . I : NEXT 

100 CALL49700 

0 REM BYTES.BAS (ATMOS) 

10 DATAA9.0A.85,1 B.A9,97.85.IC,60.EA,20.B0.CC,A9,lA.AO 

15 DATA97.A2.10,20,65,F8.4C,20.97,EA.20.20.20,20,20,00 

20 DATAAS.A6,38.E5.AO,AA,A5.A7,E5.A1 

30 DATA85.D1.86.D2.A2,90,38,20.31,DF 

40 DATA20,D5,EO,A2,0F,20,65.F8 

50 DATAA9,46,AO,97,A2,15,4C,65.F8.60 

60 DATA20.42,79,74.65,73,20.46.72,65,65,0 

90 HIMEM496FF : FORN = 49700T04975 !•' 

95 READI4 : I = VAL("#"♦1*)tPOKEN.I :NEXT 
100 CALL49700 


LISTINGS ORIC-1 et ATMOS 
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nouvelles 


ILS ONT GAGNE ! 

CONCOURS "MEURTRE A GRANDE VITESSE" 
List» des gç jnants 


1" Prix : Laurent GAMETE et Roberte-Amélie 
FOUQUET, PARIS 
2* Prix : Thierry SIRBA, NANTES 
3* Prix : Guy HUON, AUBERGENVILLE 
Ex-aequo : Jean-Marc HENRY, SAINT-LO 
Nelly AVRILLON, JAULGONNE 
Jacques et Dominique GUERIN, PARIS 


Nous télicilons chaleureusement les heureux gagnants. Nous rappelons que 
le premier prix était offert par TRAN (un Jasmin) et le second par DIGITELEC 
(un MODEM DTL 2000) 

La solution vous sera donnée... quand le concours, sur le même thème, sera 
clos pour les autres ordinateurs. 



AVEZ-VOUS 
LA COLLECTION 
COMPLETE 
DE THEORIC ? 



Bon de commande page 3 


UN CADEAU 
POUR NOËL 

voir page 32 


O 


CLUB 


CLUB INFORMATIQUE 
"LISTING BUG" 

2, rue de la Source 
68420 GUEBERSCHWIHR 
Echange idées, logiciels, trucs et 
astuces. 

Nous disposons du matériel sui¬ 
vant : 

4 ORIC-1 
4 ORIC ATMOS 

1 ZX SPECTRUM 

2 COMMODORE C64 
1 MPF 2 

1 APPLE 2e 

Imprimantes, tables traçantes, 
lecteurs Jasmin, magnéto-cas 
sette. 


EDITEUR 

PISTE-SECTEUR 

Joël Becker 


MA mous avons déjà publié un éditeur de secteurs, mais son 
MwMinconvénient était de nécessiter l'emploi d'un moniteur. 
■ V Celui-ci se suffit à lui-même et vous pourrez aisément 
"réparer" ou analyser le contenu d'une disquette Jasmin. 


Bien que le mode d'emploi soit dans 
le programme, nous croyons bon de 
résumer ici les commandes disponi¬ 
bles. 


Ecrit pour ATMOS, le programme 
peut être adapté à l'ORIC-1 moyen¬ 
nant les modifications suivantes : 


ESPACE Secteur suivant 
ESC Choix Piste-Secteur 
£ Réafficher le secteur 

Retour au Basic 

RETURN Modifier l'octet pointé 
/ Abandon de la modif. 

I (Shiftô) Sauver le secteur 

Les touches de curseur permettent de 
se déplacer sur la page écran. 


Remplacement des PRINT® X,Y 
par 

POKE 616, Y - 1 :PRINT:POKE 

617, X- 1 

PRINT 

Ligne 200, CALL # E6CA au lieu de 
CALL # EE1A 

Ligne 540, CALL # E804 au lieu de 
CALL # EDE0 
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1 '- 

2 1 
3 ’ 

* ' 

5 ' 'Joël BECKER 18/5/85 
à ’ 

8 ’ 

10 ’ VISU ET I10DIF DE SECTEURS 
U ’ 

15 ’ 

16 ’ LECTEUR DE DISQUETTES JASMIN 

17 ’ 

18 ’ 

19 ’- 

20 ’ 

21 ’ 

22 'POUR 0R1C 1 REMPLACER PRINT 3,X,Y 

23 'PAR POKE 616,Y-l s PRINT : 

2* ’ P0KE617,X-l :PRINT(CE QU’IL Y A) 

25 IFPEEK(»f.8B2)O*60Tl€NG0SUBlin00 

26 HIMEMI4000 

27 DOKE»B7D8.*804:D0KE*B7DA,»3E10:D0KE# R 
B7DC,»810:DOKE»B7DE,»4 ’ FLECHE ( 

28 PAPERO: INK7:CLSîPCiKE618,42 

30 DE-*5000 'SECTEUR STOCKE ICI 

31 DOKEO.DE 'POUR LA ROUTINE L.M 

32 FI=DE+*FC 

33 FF=DE+255 

34 ’ PC POSITION DANS LES OCTETS 
36 XC=2 ’ ABSCISSE CURSEUR 

38 YC=1 ’ ORDONNEE CURSEUR 

39 ’ AX NB DE 0 A 9 DERIVE DE XC 
50 ES*=CHR*(32) 

60 ZEt=CHRt(48) 

100 PRINT:PRINT:INPUT'PISTE *;P 

102 IFP(OTHEN100, 

104 IFP>40THEN100 
110 PRINT:INPUT'SECTEUR *;S 
112 IFSUTHENllO 

114 IFST17THEN110 

115 P0KEI48C,1:D0KEI48F,DE 
120 P0KE*48D,P 
130 P0KE*4BE,S 
140 1RS 

200 CALLIEE1A:CLS:PRINTCHRtl145);CHRtl1 
31); 

210 PRINT' PISTE:*;Pî* SECTEUR:' 

|S 

300 CALLIBBOO 
540 CALLIEDEO 

545 PL0T2,1,231 :XC=2:YC=1 

546 PC=DE 
550 GETZt 
555 X=FRE(") 

560 X=ASC(ZS) 

570 IFX=27THENCLS:60T0100 
580 !FX=92Tt€NP0KE618,ll:CLS:END 
582 IFX=32THEN600 
584 IFX=8TKEN800 
586 IFX=9THEN900 
588 IFX=10THEN1000 
590 IFX=11THENI100 

592 IFX=13THEN1300 

593 IFX=95THEN200 


594 IFX=94THEN1500 

595 G0T0550 

600 S=S*1:1 FS)17THENS=1 :P=P+1 

610 IFP>40THENP=0:5=1 

650 60T0115 

800 PC=PC-1 ’ 6AUCHE 

810 IFPC<DE THENPC-DE 

820 G0T020O0 

900 PC=PC+1 ’ DROITE 

910 IFPOFF THENPC=FF 

920 60T02000 

1000 PC=PCMO ’ BAS 

1010 IFPOFF THENPOFF 

1020 G0T02000 

1100 PC=PC-10 ’ HAUT 

1110 IFPC<DE THENPC=DE 

1120 60T02000 

1300 PRINT30,0;CHRtl148);CHRtl131) 

1305 PRINTS2,0;' 

1310 PRINTS8,0;* * ; :INPUT*NOUVELLE VALEU 

■ 5 xt 

1311 IFXt=*/'Tl£N1400 

1312 IFASCCLEFTtX Xt,1>)<58THEN1319 

1313 FORIMTOLEN(Xt):POKEPC-t+I,ASC<HID 
t(Xt,1,1)) 

1315 ÆXT:G0T01340 

1319 X=VAL(Xt) 

1320 IFX>255THEN1400 
1330 POKEPC.X 

1340 CLS: PR INT :CALLIB800: PLOTXC, YC, 251 
1400 PRINTaO,0;CHRtl145);CHRS(131); 

1405 PRINTS2,0;* 

1410 PRINT32,0;* PISTE:*jP;* SEC 
TEUR:';S 
1450 60T0550 

1500 PRINT30,0;CHRt(i50);CHRtl132) 

1505 PRINT82,0i* 

1510 PRINT34.0;'SAUVEGARDE DU SECTEUR I 
0/N) ?' 

1520 GETZt:IFASC(Zt)()79THEN14Pn 

1530 P0KEI48C,1:D0KE*48F,DE 

1540 P0KE»48D,P 

1550 P0KEI4BE.S 

1560 'HS 

1570 60T01400 

2000 PLOTXC,YC,32 

2005 XX=PC—DE 

2010 X=XX/10 

2020 YC=INT(X> 

2050 X=X-YC:X=X*10:X=X+.01 :X=INT(X) 

2055 AX=X 
2060 X=X*3ïXC*X^2 
2140 YC=YC*1 
2150 PLOTXC,YC,251 
2199 60T0550 

10000 DATAA9,2A,8D,6A,02,A2,0D,20,7C,F7 
,A5,00,85,02,A5,01,85,03,20,61,B8,20 
10010 DATA6A,B8,60,AO,00,B1,02,85,06,20 
, 8D, B8, A5,07, AA, 20,7C, F7, A5,08, AA, 20 
10020 DATA7C,F7,A9,20,AA,20,7C,F7,CB,C0 
2050 X=X-YC:X=X*10:X=X+.01:X=INT(XI 


2055 AX=X 
2060 X=X#3:XC=X+2 
2140 YC=YC+1 
2150 PLOTXC,YC,251 
2199 60T0550 

10000 DATAA9,2A,8D,6A,02,A2,OD,20,7C,F7 
, A5.00,85,02,A5,01,85,03,20,61,B8,20 
100)0 DATA6A,B8,60,AO,00,B1,02,B5,06,20 
,8D,B8,A5,07,AA,20JC,F7,A5,0e,AA,20 
10020 DATA7C,F7,A9,20,AA,20,7C,F7,CB,CO 
, OA, DO, E2,60, AO, 00, B1,02, C9,20,30,46 
10030 DATAC9,7E,10,42,AA,20,7C,F7,C8,CO 
, OA, DO, ED, 60,18, A5,02,69, OA, 85,02, A5 
10040 DATAOO, 18,69,FA,C5,02,DO,01,60,20 
, 19, B8,20,3A, B8,4C, 50, B8,38, A5,02, E9 
10050 DATAO4,85,‘02,A0,04,20,lB,B8,A2,20 
,AO,00,20,7C,F7,C8,CO,OC,D0,F8,AO, 04 
10060 DATA20,3C,B8,60,A9,2E,4C,46,B8,A5 
, 06,29,FO,4A,4A,4A,4A,18,69,30,20, AA 
10070 DATABB,85,07,A5,06,29,0F,18,69,30 
, 20,AA,B8,85,08,60,C9,3A,10,01,60,18 
10080 DATA69,07,60 
10100 DATA FIN 
11000 aS:PAPERl:IMG 
11040 PRINT 

11050 PRINTTABI12)CHRtl138)CHRt(148)CHR 
t(134)'PIST’SECT’ *CHRt(145) 

11060 PRINTTABI12)CHRtll38)CHRt(14B)CHR 
t(134)'PIST’SECT’ ‘CHRtl145) 

11110 PRINT:PRINT:PRINT*(ESPACE) : LIRE 
LE SECTEUR SUIVANT 

11120 PRIMT:PRINT*<ESC> ! CHOIX PIST 
E-SECTEUR 

11130 PRINT:PRINT*< _ > : REAFFICHER 

LE SECTEUR 

11140 PRINT:PRINT'< \ > : RETOUR AU 

BASIC 

11150 PRINT:PRINT'(FLECHES): DEPLACEMEN 
T CURSEUR 

11160 PRINT:PRINT'(RETURN) : MODIFIER L 
•OCTET POINTE 

11170 PRINT:PRINT*< / > : ABANDONNER 

LA MODIFICATION' 

11175 PRINT:PRINT'< * > : SAUVER LE 

SECTEUR SUR DISC 

11180 PRINT:PRINT'- ENTREZ L’OCTET A 

MODIFIER -» 

11185 PRINT'- OU LA CHAINE DE CARACT 

ERES -' 

11200 N=*B800 

11205 READAtiIFAt='FIN* THEN 12100 
11210 A=VAL('*'+At):POKEN,A 
11220 N=N+1:GOTO11205 
12000 IFPEEKIIFFFD)=*F8THEN12100 
12010 AMF73F 

12020 D0KE*B808,A:D0KEIB826,A:D0KEIB82C 
,A:D0KE*B832,A 

12030 D0KE*B848,A:D0KE*B87B,A 
12100 PRINT:PRINT;PRINT* TAPEZ UfC TOU 
CHE POUR CONTINUER 
12110 GETZtsRETURN 
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Moniteurs et Interfaces vidéo pour la micro-informatique. 


MC 14 : 2 750 F. 
MM 14 : 2 490 F. 
HR 14: 3 600 F. 


Moniteurs 

L'affichage pour un micro-ordinateur exige 2 qualités majeures : défi¬ 
nition d'image (contraste, saturation des couleurs, stabilités et absence 
de scintillement) et compatibilité, qualités impossibles à réunir avec 
un téléviseur, même d'excellente qualité. 

EUREKA a concu. mis au point et fabriqué une gamme de moni¬ 
teurs adaptés à la plupart des micros : 

Le MC 14 est un moniteur moyenne résolution 11 accepte les signaux 
de la plupart des micros, possède un circuit son et un mode monoch¬ 
rome vert pour l'affichage de texte. Le HR 14 est destiné aux appli¬ 
cations haute résolution (660 x 500 points). 

Compatibilité directe : 

MC14 : APPLE II avec carte RVB. APPLE 2C. ATARI Pal. Com¬ 
modore 64 et VIC 20. DRAGON. EXCELVISION. HECTOR. 
LASER 3000, SPECTRUM. THOMSON T07 et M05, MSX et tous 
les ordinateurs disposant d'une sortie sur prise PERITEL 
HR14 : APPLE avec carte HR. IBM PC et compatibles. SINCLAIR 
QL et les ordinateurs haute résolution possédant une sortie sur prise 
PERITEL 

MM 14 : Péritel avec son. RVB uniquement (ORIC-THOMSON, 
MSX. etc.) 

Matériel en vente chez votre distributeur 
habituel, ou en retournant le coupon ci-contre à 


Interfaces 

Si vous n’optez pas pour la solution moniteur, vous 
aurez souvent besoin d'une interface pour brancher 
votre ordinateur sur tel ou tel téléviseur. Les inter¬ 
faces EUREKA sont susceptibles de résoudre la plu¬ 
part de vos problèmes de branchements de micro¬ 
ordinateurs. avec la meilleure qualité d’image pos¬ 
sible dans ces conditions. 


Interface 

Entrée 

Sortie 

Prix 

P6010 

Peritel 

UHF Couleurs 

495 F. 

P6015 

Peritel 

Vidéo Secam 

UHF Noir et Blanc 

UHF Couleurs 

295 F. 

P6020 

Vidéo PAL 

Peritel 

495 F. 

P6030 

Vidéo PAL 

Vidéo Secam 

790 F. 



Fournisseur Officiel de l’Education Nationale 
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A près avoir étudié sur le papier ie plan et le scénario de /' aven¬ 
ture, nous allons entrer de plein pied dans ie vif du sujet. Nous 
allons nous reporter, pour l'étude de Coiditz, au listing paru 
ie numéro 12 de THEORIC. 


Nous allons, dans un premier 
temps, créer la liste des empla¬ 
cements et des objets (voir 
tableaux 1 et 2). Les emplace¬ 
ments sont décrits dans les datas 
des lignes 3380 à 3570. On voit, 
à la suite de chaque emplace¬ 
ment, la liste des directions pos¬ 
sibles présentée sous forme 
compactée. SU signifie que l'on 
peut aller au sud, NOSUOU 
donne la possibilité de se dépla¬ 
cer vers le nord, le sud et l'ouest. 
Les étoiles indiquent qu'il est 
impossible de sortir de la salle de 
garde ; effectivement, si le hasard 
vous pousse dans cette pièce, 
vous êtes capturé par les gardes ! 
La mise en tableau de toutes ces 
données se fait à la ligne 170. Les 
emplacements sont stockés dans 
la variable E$(n) et les directions 
possibles dans la variable D$(n) 
où n indique le numéro de la 
pièce. Ainsi, si après un break 
vous tapez : PRINT E$(7), D$(7), 
vous obtiendrez : dans un garage, 
SUOU. Le nombre d'emplace¬ 
ments étant supérieur à 10, on 
voit qu'il a été nécessaire de 
dimensionner E$ et D$ en ligne 
25. Pour 20 emplacements, DIM 
E$(20), D$(20) aurait été suffi¬ 
sant. Maintenant que le plan du 
château est mémorisé dans un 
tableau, nous allons réitérer la 
même opération pour la liste des 
objets que l'on trouve dans les 
datas des lignes 3620 à 3720. 
Après chaque objet, nous trou¬ 
vons un chiffre qui indique dans 
quel emplacement se trouve l'ob¬ 
jet. Ouvrons ici une petite paren-. 


thèse pour expliquer le rôle du 
zéro que l'on trouve après cer¬ 
tains objets. Ce 0 signifie que 
l'objet n'est pas apparent. Par 
exemple, la grosse clé ne devient 
visible que quand le coffre est 
ouvert. La ligne 200 définit le 
nombre d'objets O à 34 et charge 
les objets dans le tableau 0$(n) 
et l'emplacement des objets dans 
le tableau EO(n). Ici encore, on 
voit que ces tableaux ont été 
dimensionnés en ligne 25. Après 
un break, il est possible de véri¬ 
fier le contenu de ces tableaux en 
tapant, par exemple, Print 
0$(10), E0( 10), ce qui donne un 
saucisson, 6. En effet, en consul¬ 
tant le plan du château, on voit 
bien que le saucisson se trouve 
bien dans les cuisines et que les 
cuisines constituent la pièce 
n° 6. 

L'analyseur 
de syntaxe 

L'analyseur de syntaxe est le 
cœur de tout jeu d'aventure. De 
ses performances dépend l'inté¬ 
rêt du jeu. Celui que nous avons 
développé pour Coiditz se 
comporte très honorablement, 
c'est-à-dire qu'il fournit une 
réponse cohérente, même quand 
les ordres qui lui sont données 
sont absurdes. 

Comment est-ce possible ? Tra¬ 
ditionnellement, depuis l'avène¬ 
ment des aventures de Scott 
Adams sur TRS 80 et Apple II 
(presque 10 ans déjà), les ordres 
sont donnés sous la forme d'un 


Marcel LE JEUNE 
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verbe et d'un complément. 
Exemple : ASSOMMER GARDE. 
L'analyseur de syntaxe va détec¬ 
ter le verbe en prenant les 4 pre¬ 
miers caractères de l'ordre à 
l'aide de la commande LEFT$(4). 
L'ordre est maintenant sous la 
forme : ASSOMMER GARDE. Il 
faut ensuite rechercher le 
complément. Nous allons poser 
un pointeur sur le dernier carac¬ 
tère de l'ordre, c'est-à-dire le E de 
GARDE. Puis, nous allons, à 
l'aide d'une boucle, déplacer le 
pointeur vers la gauche jusqu'à 
ce que l'on rencontre un espace 
qui sépare le verbe du complé¬ 
ment. A partir de là, nous allons 
prélever les trois caractères situés 
à droite de l'espace. Notre ordre 
est maintenant sous la forme : 
ASSOMMER GARDE et on voit 
bien comment ont été prélevés le 
verbe et le complément. L'expé¬ 
rience montre que 4 caractères 
significatifs sont suffisants pour 
le verbe et 3 pour le complément 
Si une ambiguité entre deux ver 
bes ou compléments d'origine 
voisines subsiste, rien n'interdit 
de prendre plus de caractères. 
Nous avons complété l'analyseur 
comportant une apostrophe 
comme par exemple BOIRE DE 
L'EAU, ceci de manière très sim¬ 
ple : le pointeur dont nous venons 
de parler s'arrête sur l'espace ou 
l'apostrophe qu'il rencontre en se 
déplaçant vers la gauche, ce qui 
donne : BOIRE DE L'EAU. Eut 
égard à la complexité de la lan¬ 
gue française, ce principe est très 
performant car il permet à l'analy¬ 
seur de comprendre des phrases 
complexes telles que : ASSOM¬ 
MER VIOLEMMENT LE GROS 
GARDE ou bien BOIRE UN PEU 
D'EAU. 

Maintenant que nous savons 
comment prélever les informa¬ 
tions essentielles de l'ordre 
donné, nous verrons dans le pro¬ 
chain numéro comment les trai¬ 
ter convenablement. 


' A’Svj'î'VS'tfO . .. \' 

' '■ " 


X 

E$(x) LISTE DES EMPLACEMENTS 

D$(x) 

DIRECTIONS 

1 

Dans un cachot abandonné 

SU 

2 

Sur le chemin de ronde au nord du château 

SU 

3 

Dans le bureau du géolier 

ES 

4 

Dans la cellule des condamnés à mort 

SU ou 

5 

Dans un long couloir sombre et humide 

su 

6 

Dans les cuisines des prisonniers 

NO ES 

7 

Dans un grand garage 

SU OU 

8 

Dans la chapelle du château 

NO SU 

9 

A Centrée de la sinistre forteresse de Colditz 

NO ES 

10 

Devant la Kommandantur 

OU ES 

11 

Sur le parking de la forteresse 

NO SU OU 

12 

Dans la réserve de bols de chauffage 

NO SU 

13 

Dans la salle de garde 

• • 

14 

Dans le bureau du commandant du camp 

NO SU OU 

15 

Dans une petite cour Intérieure 

NO 

16 

Dans une ancienne écurie du château 

NO 

17 

A l'infirmerie 

ES 

18 

Dans la salle de torture 

NO OU 

19 

Dans un corridor 

OU EST 

20 

Dans un escalier en très mauvais état 

NO OU 

Tableau 1 

X 

0$fx) LISTE DES OBJETS 

EOlxl 

Emplacement 

1 

Un petit morceau de papier 

1 

2 

Une sentinelle endormie 

2 

3 

Un trousseau de clés 

2 

4 

Une armoire 

3 

5 

Un message collé sur la porte 

0 

6 

Un prisonnier assoiffé 

4 

7 

Une formule 

0 

8 

Une trappe fermée par une chaîne 

0 

9 

Un bidon vide 

6 

10 

Un saucisson 

6 

11 

Une malle en osier 

7 

12 

Un vieux plan du château 

0 

13 

Une barre de fer 

7 

14 

Une corde 

8 

15 

Un cierge 

8 

16 

Un garde qui patrouille 

9 

17 

Une immense grille 

9 

18 

Une porte en bois sculpté avec trois serrures 

10 

19 

Un camion militaire 

11 

20 

Une fontaine 

11 

21 

Une grosse pince coupante 

0 

22 

Du bois 

12 

23 

5 soldats allemands 

13 

24 

Un coffre-fort 

14 

25 

Une grosse clé 

0 

26 

Un passe-partout 

0 

27 

Un râtelier à fourrage 

16 

28 

Des anneaux au mur 

16 

29 

Une herse qui bloque l'issue au sud 

16 

30 

Une lampe 

17 

31 

Un bureau métallique 

18 

32 

Un tiroir 

0 

33 

Un poignard 

0 

34 

Une plaque de tôle fixée par un cadenas 

18 


Tableau 2 
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- PLUS 


LA PUISSANCE NOUVELLE 
POUR ORIC 1 ET ATMOS 


ET SA GAMME DE LOGICIELS POUR LECTEUR DE DISQUETTES ORIC/ATMOS 

LES JEUX C'EST EXTRA... JASMIN PRO C'EST SERIEUX 


COIN 




JEU*I 


LES CONQUERANTS (ATMOS) 


Ce WARGAME galactique, de haute qualité graphique, vous entraînera é la 
conquête de la galaxie des trois soleils grlce à vos dons de stratège, «t 
à votre capacité de réflexion étendue. 

Vous devrez conquérir 18 planètes d'une puissance plus ou «oms grande. 
Vous devrez gérer votre araée, vos araesents, votre combustible .chaque 
erreur pouvant vous coûter cher, de aêoe il vous faudra surveiller le 
■oral de vos troupes. 

Vous voici donc prêt pour une lutte farouche contre tous les royaumes de 
la galaxie des crois soleils. 

Mais attention ce coabac durera des Jours ; heureuseaent l'ordinateur 


219 F 


vous peraettra de reprendre la partie îâ où vous l'avez laissée. 

LE REBELLE (ATMOS) 

Vous voici devant la dure tâche d'anéantir les troupes du tyran 

MAX MILIEU. 

Ce ne sera pas facile, sais vos dons de stratège et de diplomate vous 
permettront de sunsonter toutes les embûches et après plusieurs Jours de 
révolution exaltante de venir à bout de MAXIMILIEN LT TYRAN. 


ATTENTION : Comme pour les conquérants, 
peraettra de Jouer sur plusieurs séances. 


votre disquette 

219 F 


Jasmin vous 


ORIGRAPH 

Création Graphique par clavier, JOYSTICK. Aide pour la 
Logiciel de Jeu. Fonction "Paint** avec 5 motifs. Déplacement 
Loupe, Compression, Duplication, Insertion. Fonctions 
Programmables. Mélange de Texte et de Graphique. 350 F 


création de 
de dessin. 
Graphiques 


ALIEN (Atmos! Vous programmez vos ROBOTS et la Bataille fait rage I 
219 Frs 

CASSE-TETE (Atmos) Le jeu complet à 1000 Questions pour Grosse Tête Si vous n’étes pas d’accord, vous contrez 
votre partenaire, et celui-ci surcontre ; la Roue de la Chance vous départagera Divertissant au possible. 

219 Frs 

MICROGEO Programme éducatif qui vous apprend la Géographie mondiale en s’amusant. Très bien réalisé 
250 Frs 

OTHELLO Jeu de réflexion à 5 niveaux de difficulté, avec en mémoire 20 démonstrations de Maître Vous jouez 
à deux ou contre l’ordinateur Ce jeu subtil montre à l’écran des pions rieurs ou désolés selon leur chance au jeu. 
219 Frs. „ _ 

YAM Superbe jeu de réflexion qui allie le jeu de Dés au jeu de Poker On joue jusqu’à 5 personnes, ou contre I ordi¬ 
nateur. et l’écran vous donne en permanence l’état des gains des joueurs 
219 Frs 

LES SCHTROUMPF Jeu d’adresse et de labyrinthe, pour les plus jeunes Ce jeu est offert gratuitement avec OTHELLO 
et YAM 

TORTUE C’est un LOGO graphique et musical adapté à l’apprentissage de la programmation pour les jeunes de 7 
à 77 ans La créativité graphique devient votre domaine et vous conservez en mémoire sur disquette JASMIN le 
fruit de vos magnifiques réalisatons. 219 Frs 

SPECIAL JEUX POUR NOËL 


Le Pack de 4 JEUX OTHELLO ♦ YAM + SCHTROUMPF ♦ MINI CASSE TETE 1200 Questions! 

COIN DES P* 0S 

• JASMIN MULTIFICH : Puissant logiciel de gestion de fichiers à accès direct sur plusieurs critères Plus de 1 2000 fiches possibles sur lecteur double tètes. Edition plein 
écran Masque de saisie programmable sur plusieurs pages. Tri sur n’importe quelle rubrique Toute combinaison avec 5 critères de comparaison et 2 opérateurs de liaison. 
Logiciel en langage machine rapide. Protection logique par tampon, contre micro coupure Mailing Pour toute imprimante. MULTIP Ci ‘ soif aussi ccsiculur 


• JASMIN E ASYTEXT : Traitement de TEXTE complet avec tout caractère accentué, jambage descendant. 70 caractères spéciaux Plus de 30 commandes d'édition. 
Souligné. Justification à droite, centrage, caractères gras ou double taille, tabulation décimale, transfert de bloc, recherche et permutation de chaînes Glossaire de formules 
usuelles Concaténation Commandes pilotables par un programme BASIC (MAILING) Longueur de ligne jusqu à 255 caractères Paqmation automatique. Très grande 
facilité d'emploi. Compatible SEIKOSHA 100 et 500. CGP 220. BROTHER EP 22 et EP 44. MANESMAN TALLY. RITEMAN. EPSON RX80FT. EM 60 (à marguerite) 

JASMIN PRINTER 590 F 


JASMIN-CALC 

C'est une table de calcul automatique puissante en Language Machine pour 
ORIC ATMOS 

60 déplacements sur simples colonnes de tailles définissables, sur 99 lignes 
Un des tableurs des plus complets : 

Chargement. Sauvegarde, Destruction de Tables. Catalogue 

- Listing sur imprimante du contenu des cases, et des formules employées 

- Insertion et Destruction de lignes et de colonnes. 

• Transfert absolu ou relatif d'une case ou bloc de cases I Les formules sont 
translatées) 

Duplication d'une case ou groupe de cases en absolu, mais aussi en relatif. 
Mise â blanc d'une case ou groupe de cases. 

Protection et Déprotection de cases ou groupes de cases permettant ainsi 
l’équivalent d'un masque de saisie 


Remplissage conditionnel d'une case selon recherches en tableau, exem¬ 
ple : recherches et calculs d'une tranche d'imposition ou les différents taux 
de commissions d'un VRP. 

JASMIN CALC utilise toutes les fonctions mathématiques usuelles de 
l'ATMOS (y compris Sinus. Cosinus. Log, etc...) 

Calcul itéractif des résultats, en manuel ou automatique. 

Gestion ergonomique des Fonctions par fenêtre à l'écran. 

Avant la décision, simuler les conséquences en quelques secondes avec J AS 
MIN CALC : 

Gestion d'entreprise, rentabilité d'un projet, etc.. 

Applications diverses : tables financières, facturation, paye, calculs divers, 
etc... 

En prime sont fournis « FACTURE v' « PYTHAGORE » • « PROJET ». 590 F 


JASMITEL : Enfin, grâce au lecteur de disquette 
JASMIN, un programme simule un MINITEL avec 
l'intermédiaire d'un modem type DIGITELEC II vous 
est possible, sans minitel, d'entrer directement en 
conversation avec les différents serveurs, de mettre 
en mémoire de masse JASMIN les données qui vous 
sont proposées et vous pourrez ultérieurement rap 
peler sans payer de taxe. tout ce qui aura été enre 
gistré en mémoire 

L Ergonomie du programme est remarquable et les 
utilisateurs professionnels von» faire bon accueil ace 
système d'un prix très étudié. 490 F 


MATHEGRAPH 3D HISTO 
Etudes et analyses des fonctions mathématiques 
symboliques. 

Courbes Histogrammes en bâtonnets Galettes 
Tous en trois dimensions et en couleur. 
Représentations copiables sur imprimantes. 249 Frs 

JASMI-BANK 

Gestion bancaire Pointage automatique sur plus 
de 5 colonnes Fusion des comptes Solde glo 
bal de trésorerie Ventilation et analyse des 
budgets. 290 Frs 


JASMIN-FORTH. un vrai FORTH ATMOS sur 
disquette. 

Ce langage évolué, beaucoup plus rapide et plus 
dense que le BASIC. l’Interpréteur compilateur 
FORTH vous offre un accès simple aux disques JAS 
MIN et à la programmation structurée 
Il possède en particuliei un éditeur puissant, un 
Assembleur 6505. un désassembleur et un décom 
pilateur FORTH 

Pour bien maîtriser le FORTH, consultez les ouvrages 
spécialisés tels que FORTH. de SALMAN. TISSE 
RAND et TOULOUT des Editions EYROLLES 590 F 

JASMIN-ASSEMBLEUR 


JASMIN-FINANCES 


Puissant Asseobleur-Desasseableur symbolique trois passes. 


Programmes de prêts bancaires, à l'écran ou sur imprimante. Ces programmes intègrent, 
et c'est une nouveauté le coût de l'inflation, avec ses conséquences inattendues, mais heu¬ 
reuses pour ('emprunteur. 

C'est un excellent utilitaire pour tous, particulier ou homme d'affaire. 219 F 

SPECIAL LOGICIEL PROS 

EASYTEXT + MULTIFICH + JASMIN CALC 


Editeur pleine page de fichier source. 

Nunerocation et Renumérotation autooatlque. 

Occupation minimale en séaoire centrale par asseablage sur disque. 

Nombre de labels llliaité et possibilité d'opération sur les labels. 
Recherche de chaînes de caractères. 

Duap aéaoires. 

Peroet de travailler aussi dans la aéooire "Overlay". 

Outil Indispensable pour la création de fichiers sources et d'assemblage 
en fichiers codes. aqn r 


les trois 1390 Frs 

les deux au choix 990 Frs 

pour tout achat de deux logiciels ou plus moins dix pour 
cent. 

Programmeur amateur ou professionnel : nous sommes 

intéréssés par vos programmes : 

JEUX, UTILITAIRES ou PROFESSIONNELS 

Contactez Mr ROUSSEAU 


BON DE COMMANDE PAR CORRESPONDANCE 



TRAN sari. - 53, impasse Blériot 
83130 LA GARDE - Tél. : 94.21.19.68 

Nom :. 

Adresse : . 

Code Postal : . Ville 

désignation 

Quantité 

P» U «te 

Mt ne 














total 


Forfait de Port Express en France 40 F TTC 

Ci K»nt un chèque 
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-théorie_ 

UN 

CADEAU i 
POUR 


Les programmes publiés dans 
THEORIC sont disponibles sur 
disque (JASMIN seulement, pour 
le moment). Chaque disquette 
contient les programmes de deux 
numéros de THEORIC. Les dis¬ 
quettes portent un numéro . 

Les disquettes sont livrées, 
franco de port, contre un chèque 
de 135 F pour les abonnés, et 
1 65 F pour les non-abonnés. 
Les programmes figurant sur ces 
disquettes sont tels que publiés 
dans la revue. Ils n'ont subi 
aucune modification. 


OFFREZ UN 
ABONNEMENT 
A THEORIC 




(attention 


Cl-lolnt un ch *5» ü *|J # io Avenue a». 
Edition. SORACOW, ^ l7Q brU Z 




35170 



Prénom 



(Code P° s,al Signature 

Pays . 


Ville 


160 f! 
270 F| 


Abonné."* ‘ " n °F ra n«. mW.ropoHtoln. • • — + 140 j, 

Abonnement . . . . . 

Tarif - - — 


Une ligne téléphonique est à 
votre disposition, vous mettant 
en contact direct avec la rédac¬ 
tion. Ceci est un service sans 
égal ! Respectez simplement les 
horaires et les jours que nous 
vous indiquons : 

MERCREDI de 9 h à 12 h et de 
14 h à 17 h. 

VENDREDI de 9 h à 12 h seule¬ 
ment. 

Tout appel en dehors de ces cré¬ 
neaux sera refoulé : ne dépensez 
pas inutilement votre argent ! 
Le numéro : 99.52.98.11. 
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nouvelles. 


COMMUNIQUE DE PRESSE 


LORITEL vient d'être récompensé 
par deux prix : Le TILT D'OR de 
la meilleure innovation technique 
et l'OSCAR DE LA VILETTE. 86, 
prix du jeu/jouet scientifique, qui 
a été remis le 20 novembre par 
Monsieur le Ministre Hubert 
CURIEN. 

La plus grande des récompenses 
pour LORITEL reste avant tout 
l'immense succès que remporte 
ce produit auprès du grand 
public. 

LORITEL impose sa norme de 


Nous confirmons aux lecteurs qui 
nous ont écrit concernant le pro¬ 
gramme RENUM-DESTRUC, paru 
dans THEORIC n° 6, que celui- 
ci fonctionne aussi bien sur 
ORIC-1 que sur ATMOS. 


communication comme un stan¬ 
dard de fait, et des serveurs tra¬ 
vaillent en ce moment en colla¬ 
boration avec LORICIELS, afin 
d'ouvrir leurs services aux micro¬ 
ordinateurs. 



Marc BAYLE, LORICIELS. reçoit des mains de 
Monsieur le Ministre H. CURIEN. l'Oscar 86 
de la Villette. pour LORITEL. 

Crédit Photo : Thierry LAVAILL 


Il faut néanmoins penser à faire 
un HIMEM # 99FF avant de l'uti¬ 
liser. 

Ceci peut être incorporé dans une 
ligne au début du programme. 



LES DISQUETTES DE THEORIC 

Tous les programmes de THEORIC/ groupés par deux numéros sur une disquette. Plus de perte de temps 
pour les taper... Existe pour le moment en JASMIN seulement, mais bientôt, la version DISCORIC sera 
disponi b{e. _ 

Le prix-1^j$3^fep«ur les abonnés (joindre impérativement I'étiquette)^p5 F pour les autres. 
Avertissement : les programmes stockés sur ces disquettes sont tels que parus dans THEORIC. A vous de les 
adapter à vos besoins et au fonctionnement sur disque lorsque nécessaire. 



U 

TEST .BAS 

S 

2 SECTORS 

U 

SUPDESAT.BAS 

S 

45 SECTORS 1 

N° 1 THEORIC n° 4 et 5 

J 

UTIL3 .BIN 

S 

5 SECTORS 

U 

CITYRAID.BAS 

S 

14 SECTORS | 

N° 2 THEORIC n° 6 et 7 

U 

UTIL3 .BAS 

s 

16 SECTORS 

U 

SCROLLAT.BAS 

s 

8 SECTORS 

N° 3 THEORIC n° 8 et 9 

U 

DI SCOJAS.BAS 

s 

11 SECTORS 

U 

SCR0LL01.BAS 

s 

8 SECTORS 

N° 4 THEORIC n° 10 et 12 

U 

EPARLOGE.BAS 

s 

20 SECTORS 

U 

VERBORIC.BAS 

s 

98 SECTORS , 

N° 5 THEORIC n° 13 et 14 

U 

PAINT .BAS 

s 

9 SECTORS 

U 

C0UL4VC .BAS 

s 

5 SECTORS 1 

N° HS THEORIC HORS SERIE 

U 

WINDOSAS.BAS 

s 

14 SECTORS 

U 

C0UL4VA .BAS 

s 

8 SECTORS 1 

(n° 11) 

U 

WINDODAT.BAS 

s 

7 SECTORS 

U 

C0UL6VA .BAS 

s 

10 SECTORS 


U 

WINDODEM.BAS 

s 

5 SECTORS 

U 

COULBVA .BAS 

s 

10 SECTORS | 


U 

WINDOW .BIN 

s 

3 SECTORS 

U 

EDITCAR .BAS 

s 

12 SECTORS | 

VOLUME : TOI3414 

U 

MOTCACHE.BAS 

s 

15 SECTORS 

U 

PHOTO1 .SCR 

s 

33 SECTORS 1 


U 

TO .BAS 

s 

4 SECTORS 

U 

LOADPHOT.BAS 

s 

2 SECTORS 

L FTD0S3-2.SYS S 62 SECTORS 

U 

PROGVARS.BAS 

s 

6 SECTORS 





U TANDEM13.BAS S 96 SECTORS 

U 

SUPDES01.BAS 

s 

45 SECTORS 

122 SECTORS FREE 
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BON DE COMMANDE 
DES DISQUETTES THEORIC 


Je commande les disquettes 1 2 3 4 5 HS 
Ci-joint : 135 F par disquette et mon étiquette abonné 
165 F par disquette car je ne suis pas abonné 

Soit au total la somme de F réglée par chè¬ 

que ci-joint. 


NOM . Prénom 

Adresse . 

Code Postal .... Ville . 
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les logiciels. THEORIC et Michel DELLA-VALLE vont lui per¬ 
mettre, grâce à MUSICORIC, de montrer ses talents d'ar¬ 
tiste musicien. Nous attirons votre attention sur le fait qu'il est 
indispensable de posséder des notions de musique pour exploi¬ 
ter, au maximum de ses possibilités, le logiciel proposé. 

Ecrit et développé sur ORIC-1, il pourra être transposé sur 
ATMOS au prix de quelques modifications indiquées par l'au¬ 
teur. 


Le synthétiseur de l'ordinateur 
ORIC-1 a des possibilités musicales 
intéressantes, malheureusement dif¬ 
ficiles à exploiter de façon satisfai¬ 
sante à partir du Basic. Le pro¬ 
gramme "Musicoric" est destiné à 
pallier cette lacune et comprend 
deux parties : 

— Un éditeur musical, en Basic, per¬ 
mettant la saisie d'une partition sur 
1, 2 ou 3 voies, puis, éventuelle¬ 
ment, des corrections, des reprises, 
des transpositions. La voie 3 peut en 
outre être utilisée comme batterie 
avec grosse caisse et caisse claire. 

— Une exploitation du synthétiseur 
en C.M., permettant un jeu totale¬ 
ment indépendant des 3 voies au 
niveau de l'enveloppe, du volume, 
du sustain des notes percutées, ainsi 
que l'utilisation ou non d'un vibrato 
dont on peut modifier la profondeur 
et la vitesse. 


MODE D'EMPLOI 

Saisie d'une partition : 

Elle se fait de façon interactive, le 
programme demandant les données 
nécessaires et signalant les erreurs 
éventuelles. 

Données générales : 

— titre du morceau, 

— nombre de voies utilisées, 

— utilisation éventuelle de la voie 
3 en batterie, 

— altérations à la clé, qui seront 
ensuite gérées automatiquement 
par le programme, 

— rythme (rapporté à 3 temps = un 
rythme 3/4 est noté 3, un rythme 
12/8 est noté 6). 

L'entrée des notes se fait mesure par 
mesure et voie par voie, le pro¬ 
gramme demande successivement : 

— le nom de la note : que l'on entre 
au clavier : DO, RE, etc. En cas d'al¬ 
tération accidentelle, on l'ajoute au 
nom de la note : FA, SIB, ou SOL N 


(note altérée à la clé, mais devant 
être naturelle à cet endroit) ; 

— l'octave : 0 à 6, correspondant à 
ceux du basse ; 

— la durée : R pour ronde, B pour 
blanche, N pour noire, C pour cro¬ 
che, D pour double croche, T pour 
triple croche. 

S'il y a une altération de la durée, 
elle est tapée à la suite : P si note 
pointée, T si note appartenant à un 
triolet, L si note liée à la suivante 
(ex.: NP pour une mire pointée, CT 
pour croche-triolet). 

Pour les silences, on entre PA à la 
place du nom de la note ; la durée 
est saisie de la même façon qu'une 
note. Si une note est semblable à la 
précédente en hauteur et en durée, 
on tape seulement ID. 

Enfin, si l'on entre 0 à la place du 
nom d'une note, le programme 
génère un silence pour la durée res¬ 
tant à courir dans la mesure, pour la 
voie en cours de saisie. 
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Si la voie 3 est utilisée en batterie, 
on utilise GC pour grosse caisse et 
CC pour caisse claire. La durée est 
notée de la même façon que celle 
des notes. 


mentd'un octave plus grave ou 
plus aigu, 

— d'écouter une mesure note à note. 


Quatre autres instructions sont utili¬ 
sables en début de mesure : 

RP : permet de reprendre un certain 
nombre de mesures déjà entrées, 
TN : s'il y a changement de tonalité 
en cours de morceau, 

ME : s'il y a changement de rythme 
en cours de morceau, 

FIN : fin de saisie, qu'il sera possi¬ 
ble de reprendre ultérieurement. 
Dans tout le programme, l'entrée de 
"E" permet en cas d'erreur de reve¬ 
nir au choix ou à la saisie précé¬ 
dents. 


La seconde partie de l'éditeur per¬ 
met : 

— de reprendre la saisie d'un mor¬ 
ceau, 

— de faire des corrections, 

— de transposer une voie en seule- 


Les autres parties permettent : 

— le passage au programme C.M. 
pour l'écoute, 

— la sauvegarde du morceau, avec 
ses paramètres d'écoute, 

— le réenregistrement d'un ou plu¬ 
sieurs morceaux d'une cassette. 
Avant d'être sauvegardé, le mor¬ 
ceau est automatiquement compacté 
afin de tenir le moins de place pos¬ 
sible. L'opération inverse est effec¬ 
tuée lorsqu'un morceau est rechargé 
à partir d'une cassette. 

Au niveau de l'écoute (de préférence 
sur une chaîne... ), en jouant sur le 
volume, l'enveloppe des notes (son 
continu ou son percuté), la durée du 
sustain des notes percutées, et en 
ajoutant ou non du vibrato, on 
arrive à une imitation d'instruments, 
assez satisfaisante, malgré l'ab¬ 
sence de filtres de fréquence : gui¬ 
tare, piano, clavecin, guitare basse. 


vibraphone, flûte, etc. 

Un affichage vidéo facultatif est dis¬ 
ponible, de type "psychédélique", 
il varie en fonction de la hauteur et 
du volume des notes jouées. 


Pour la saisie du programme : 

— taper d'abord la partie C.M. 
avec un chargeur (en fin de cas¬ 
sette), 

— puis la sauvegarder juste derrière 
le programme Basic par CSAVE 
"MUSIC", A37800, E38860, 
AUTO. 

Ainsi, lors du lancement du pro¬ 
gramme, la partie C.M. sera auto¬ 
matiquement chargée. 


ADAPTATION ATMOS 
(sous réservas... ) 


Remplacer : 

CALL # ED01 par CALL # E7CA 
CALL # E804 par CALL #E93D 
Dans la partie hexa, remplacer ligne 
8100 et ligne 8110, le 26FB par 
40FB. 
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utilitaire 


BRANCHE Z-VOUS 

MINITE! 


Frédéric TARAUD 





ravMU 1 _ 
16 V» 


V r ous n'êtes pas sans savoir que l'expérience Minitel se 
développe dans notre pays, et que bientôt tout le monde 
aura chez lui cet appareil, bien plus intelligent qu'il n'y 
paraît au premier abord. 

Quand on sait, d’autre part, que 
cette machine est prévue pour 
pouvoir être connectée à un péri¬ 
phérique, vous aurez tout de 
suite compris que ce périphérique 
ne sera autre que notre ORIC. 

Que d'applications en perspec¬ 
tive ! Micro-serveur, messagerie, 
échange de programmes ou de 
données, autant de possibilités 
qui vous seront bientôt offertes. 

Mais, avant toute chose, 
penchons-nous sur la façon de 
connecter l'ORIC au Minitel. 


\ 


son Minitel/Oric se fera, non pas 
sur 8 bits, mais sur 7. Le bit de 
poids fort ne sera pas transmis. 
Revenons donc à notre caractère 
A. Sa transmission en série aura 
l'allure suivante : 


1 B« <1« Stop 

• 101 


Bn d« Start 
Ml 


Btt (ta Parrt» 
(0 ou 1) 


Incompatibilité d'humeur 
ORIC/Minitel 

Il n'est malheureusement pas 
possible de brancher directement 
ces deux machines... (à moins de 
fabriquer la liaison série par SOFT 
comme LORITEL, de LORICIELS). 
Pourquoi ? Tout simplement 
parce que l'ORIC ne possède 
qu'une sortie parallèle, c'est-à- 
dire que chacun des bits d'un 
octet est transmis (par exemple 
à l'imprimante) dans un fil séparé. 
Faites le compte : il faut au mini¬ 
mum 8 fils plus une masse, sans 
parler des deux signaux de 
contrôle. 

Or, avec le Minitel, rien de tout 
cela ! En tout et pour tout trois 
fils ! Un pour envoyer l'informa¬ 
tion, un pour la recevoir et une 
masse. 


Principe de la 
liaison série 

Comment cela se passe-t-il ? Très 
simplement. Il suffit d'envoyer les 
8 bits qui forment l'octet à trans¬ 
mettre les uns derrière les autres, 
à une certaine vitesse, dans un 
seul fil et en commençant par le 
bit de poids faible. D'où le nom 
de liaison série. Pour compléter le 
tout, on place, devant l'octet, un 
bit dit de START, pour préciser le 
départ, et à la fin un bit dit de 
PARITE, qui permet au système 
de réception de contrôler le bon 
état de l'octet lors de son arrivée. 
Sans oublier un bit de STOP pour 
signaler la fin. Prenons un exem¬ 
ple : Imaginons que l'on trans¬ 
mette la lettre A. Code ASCII : 
# 45, soit en binaire : 

01000101 

MSB LSB 

Remarquons d'abord que pour 
tous les caractères ASCII et les 
codes de contrôle (de 0 à 127), 
le bit de poids fort est toujours à 
0. 

C'est pour cette raison que la liai¬ 


Calcul de la parité 

Dans le cas qui nous intéresse, la 
parité est dite paire, c'est-à-dire 
que le bit de parité sera à 0 si le 
nombre de 1 dans l'octet trans¬ 
mis est pair. Dans notre exemple, 
nous avons deux bits à 1, donc 
le bit de parité est à 0. 

Il est bon de remarquer égale¬ 
ment qu'il ne s'agit pas ici d'une 
liaison dite RS 232 qui existe sur 
certains micro-ordinateurs. Une 
liaison RS 232 a comme niveau 
"1" +12 V et comme niveau 
"0" - 12 V, ce qui permet des 
liaisons beaucoup plus longues 
(une trentaine de mètres). Ceci 
mis à part, le principe en est le 
même. 

Vous allez peut-être me dire que 
tout cela est bien compliqué. Eh 
bien, rassurez-vous, ce n'est pas 
nous qui allons nous charger de 
tout cela, mais un circuit spécia¬ 
lisé. 

Description du 6551 

Nous allons en effet confier ce 
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travail à un 6551 appelé UART 
(Universal Asynchronous Recei- 
ver Transmitter), autrement dit 
un émetteur (Récepteur Asynch¬ 
rone Universel (liaison 
asynchrone = liaison série)]. 

Nous lui fournirons en entrée le 
mot en parallèle à partir du BUS 
(la sortie imprimante restera donc 
libre), et il nous annoncera ce mot 
sous forme série en lui accolant 
son bit de START, de STOP et de 
PARITE. 

Mais, me direz-vous, à quelle 
vitesse va s'effectuer cette trans¬ 
mission ? Effectivement, cet 
UART est capable de transmet¬ 
tre à différentes vitesses, allant 
de 50 à 19200 bauds (1 baud = 

1 bit/seconde). Dans le cas qui 
nous intéresse, le problème ne se 
posera pas : la liaison doit s'ef¬ 
fectuer à 1200 bauds. 

Oui, mais comment lui dire tout 
cela ? Eh bien, c'est là tout l'in¬ 
térêt de ce circuit : tous ces ren¬ 
seignements lui sont fournis par 
programme, par le chargement, 
dans ses registres internes (au 
nombre de 4), des données adé¬ 
quates. 

On trouvera, figure 1, le synop¬ 
tique de l'UART et, en figure 2, 
la signification de chacun des bits 
de ses registres internes. 
Précisons que la plupart ne nous 
seront pas utiles, mais l'intrêt 
d'un tel circuit, n'est-il pas d'être 
universel ? 

Rajoutons simplement que le 
registre d'état permet de connaî¬ 
tre à tout moment l'état du cir¬ 
cuit et que les registres de 
contrôle et de commande per¬ 
mettent de programmer la confi¬ 
guration dans laquelle le 6551 
travaillera. 

N'oublions pas le registre d'émis¬ 
sion dans lequel l'ORIC viendra 
écrire la donnée à émettre, et le 
registre de réception dans lequel 
l'ORIC viendra lire la donnée 
reçue. Ces deux registres sont à 
la même adresse, et c'est le cir¬ 
cuit qui nous mettra en relation 
avec l'un ou l'autre, en fonction 
qu'il détectera un ordre de lecture 
(PEEK) ou d'écriture (POKE). 
Terminons cette décription par la 
signification des pattes de 

commande :_ 

— CSO et CS1 permettent la 
sélection du boîtier. Pour être 


♦2 _ 

tm- 

csa_ 


C51_ 

RS0_ 
RS1 _ 
AT5FT- 


oe 

à 

D7 


Logique 

de 

Sélection 

et de 

Contrôle 


Registre 
d'émission 


Registre 

d'état 


Contrôle 

d'émission 


Registre 

à 

décelege 



Registre 


Générateur 

de 


de 

Contrôle 


baud 


Buffers du 
BUS de 
Données 



Registre 


Contrôle 

de 


de 

commande 


réception 


CT5 


. RCX 
.XTAL 1 
. XTAL 2 


- DTR 
RTS 


Figure 1 : Schéma synoptique du 6551 


Exemple 

RS1 

RSO 

ECRITURE 

LECTURE 

«380 

0 

0 

Registre d émission 

Registre de réception 

«381 

0 

1 

Reset programme 

Registre d'état 

«382 

1 

0 

Registre de commande 

«383 

1 

1 

Registre de contrôle 


Figure 2a Adressage des registres internes du 6551 


Interruption 


DCG = 1 


b7 

b6 

b5 

b4 

b3 

b2 

bl 

bO 


Pas d'interruption 


Reg d'émission plein 


Reg. d'émission vide 


Pas d’erreur de parité 


Erreur de parité 


Pas d'erreur de format 


Erreur de format 


Pas de débordement 


Reg de réception vidéo 


Reg. de réception plein 



b7 

b6 

b5 

b4 

b3 

b2 

bl 

bO 

Reset programme 


- 

- 

- 


0 

- 

- 

Reset Hard 

0 

- 

- 

1 

0 

0 

0 

0 


RE SE T PROGRAMME s effectu e eutam enouement fo/a de l'écriture dan» ca registre II n'y a Que la bu 2 modifié, la» autres sont inchangés 
RESET HARO lorsque la patte RESE T est activa (Ol 
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b7 

b6 

b5 

b4 

b3 

b2 

bl 

t>e 




b7 

b6 

b5 

Opération 

- 

- 

0 

Pas da parité 

0 

0 

1 

Parité impaire è 
rémission réception 

0 

1 

1 

Parité paire è l'émis¬ 
sion et réception 

1 

0 

1 

Parité impaire émise 
Pas de parité récep¬ 
tion 

1 

1 

1 

Parité paire émise 

Pas de parité récep¬ 
tion 


Echo en réception 


Ematte ur/réc ept. arrêté 
DTR. 1 


Emtnaur/récspl. valida 
DTR-0 


(RO valida 


IRQ Inlardita 


b3 

b2 

Interruption à l'émission 

RTS 

Autre 

0 

0 

Non 

1 

_ 

0 

1 

Oui 

•0 

_ 

1 

0 

Non 

0 

_ 

1 

1 

Non 

0 

Emission BREAK 


Figure 2c : Registre de commande. 


système en page 3. C'est le rôle 
du 74LS138. Inutile de revenir 
sur le décodage d'adresses, car 
vous remarquerez peut-être que 
celui-ci est identique à celui uti¬ 
lisé pour la réalisation de la carte 
universelle d'entrée/sortie, parue 
dans le numéro 2 de THEORIC. 
Pour les personnes qui l'auraient 
construite, elles pourront donc la 
conserver et ne câbler que le 
reste du circuit en utilisant une 
place libre en page 3. Il faudra 
toutefois modifier le circuit 
comme le montre la figure : 


Reset Prog. 
Reset Hard 


1 Stop bit 


2 Stop bit ou 1 stop ♦ 
bit si 8 bit ♦ 1 parité 


11/2 stop bit si 5 


bit 

longueur 

6 

5 

des mots 

0 

0 

9 

0 

1 

7 

1 

0 

6 

1 

1 

5 


Horloge externe 


Horloge interne 





0 

0 

0 

0 

0 

0 


L° 

0 

0 

0 

0 

0 


b7 

b6 

bB 

b4 

b3 

b2 

bl 

bO 


Reset prog 
Reset Hard 


0 

0 

0 

0 

Horloge externe 

0 

0 

0 

1 

50 bauds 

0 

0 

1 

0 

75 bauds 

0 

0 

1 

1 

110 bauds 

0 

1 

0 

0 

135 bauds 

0 

1 

0 

1 

150 bauds 

0 

1 

1 

0 

300 bauds 

0 

1 

1 

1 

600 bauds 

1 

0 

0 

0 

1200 bauds 

1 

0 

0 

1 

1800 bauds 

1 

0 

1 

0 

2400 bauds 

1 

0 

1 

1 

3600 bauds 

1 

1 

0 

0 

4800 bauds 

1 

1 

0 

1 

7200 bauds 

1 

1 

1 

0 

9600 bauds 

1 

1 

1 

1 

19200 bauds 


170 CONTROL 




CS1 


Figure 2d Registre de contrôle 


1/4 74LS266 

Figure 3 : Modification du décodage 
d'adresse. 


En effe t, il faut se rapp eler que la 
borne I/O CONTROL présente, 
sur le bus du microprocesseur, 
doit être positionnée à 0 
lorsqu'un périphérique autre que 
le 6522 interne est sélectionné. 
Si nous regardons la table de 
vérité d'une porte NON OU 
EXCLUSIF (ESCLUSIF-NOR en 
anglais), figure 5, nous vérifions 
que la sortie est à 0 quand l'un 
ou l'autre des périphériques 
(6522 ou 6551 ) est sélectionné. 
Par contre, si aucun des deux boî¬ 
tiers n'est adressé, toutes les sor¬ 
ties du 74LS138 sont à 1, donc 
I/O CONTROL reste à 1. 


i 

2 

3 (sortie) 

0 

0 

1 

0 

1 

0 1 des deux circuits est 

i 

0 

0 sélectionné : I/O CONTROL à 0 

i 

1 

1 Aucun circuit n'est sélectionné : I/O CONTROL à 1 


sél ectio nné, il faudra que CS0= 1 
et CST = 0. 

— $2 : horloge du microproces- 
se ur, 

— RESET : Remise à zéro du 
cir cuit s i cette patte est à 0. 

— R/W précise si lé syst ème veut 
lire ou écrir e. Po ur lire, R/W = 1, 
pour écrire R/W = 0. 

— RSO et RS1 permettent de 
sélectionner un des quatre regis- 
tre s int ernes. 

— IRQ : interruption. 

— DO à D7 : des 8 fils de don¬ 


née du bus par lesquels le micro¬ 
processeur déposera la donnée à 
émettre ou viendra lire la donnée 
reçue. 

Description de 
ta carte série 

Comme tout périphérique, le 
6551 doit être adressé par le 


Rappelons que le 74LS138 per¬ 
met d'adresser 16 octet en page 
3 en commençant de #380 à 
#38F (sortie YO), puis de #390 
à #39F (sortie VI ), etc. 

Si nous choisissons de nous 
connecter en YO, nous utiliserons 
les emplacements : 

#380 : registre d'émission ou de 
réception. 
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PRIX DE REVIENT DE LA CARTE : 

Tous les composants utilisés pour sa conception sont extrême¬ 
ment répandus. Cependant, en fonction de votre revendeur, cette 
carte pourra vous coûter entre 200,00 et 300,00 F. 

Ce prix sera bien sûr plus élevé si vous désirez la mettre dans 
un boîtier. 


# 381 : registre d'état. 

#382 : registre de commande. 
#383 : registre de contrôle. 

Les emplacements de #384 à 
38F seront inutilisés. 

On remarquera que certaines pat¬ 
tes du 6551 sont à la masse ou 
non connectées. Ce circuit étant 
initialement prévu pour créer une 
liaison RS 232, il en possèd e tous 
les s i gnaux de c ontrôle : CTS, 
DCD, DTR, RTS, etc. Nous ne 
les utiliserons pas dans notre cas. 
Mais rien n'empêche un bricoleur 
averti de se servir de ce schéma 
comme base d'une vraie liaison 
RS 232. Seuls les signaux TXD 
(Transmission de données) et 
RXD (Réception de données) 
seront câblés vers une prise DIN 
5 broches classique (on retrouve 
en effet une DIN sur le Minitel) au 
travers de buffers 74LS14 ou 
74LS04. Cela permet, d'une part, 
de ne pas attaquer directement le 
Minitel et, d'autre part, de jouer 
le rôle de ''fusible'' en cas de pro¬ 
blèmes sur la ligne. 

N'oublions pas le quartz à 
1,8432 MHz qui, malgré sa 
valeur bizarre, se trouve très faci¬ 
lement. Il permet la génération 
des différentes vitesses de trans¬ 
mission. 

Réalisation pratique 

Celle-ci ne devrait pas poser de 
problème, puisque vous trouve¬ 
rez, figure 6, le dessin du circuit 
imprimé permettant de réaliser ce 
montage. On pourra néanmoins 
utiliser d'autres méthodes de 
câblage, comme le wrapping ou 
l'utilisation de plaquettes percées 
et pastillées. Précisons que ce cir¬ 
cuit imprimé n'a pas été prévu 
pour supporter la modification de 
la figure 3. 

Cette réalisation demandera 
quand même un minimum de 
soins quant aux soudures, et il ne 
faudra pas oublier de souder les 
straps. Le choix vous est laissé 
par câblage pour le décodage 
d'adresse avec une simple sou¬ 
dure : à vous de choisir. 

En ce qui concerne les liaisons 
maintenant : la connexion carte 
série/ORIC se fera de préférence 
à l'aide d'un câble que vous 
confectionnerez et qui se compo¬ 
sera de : deux connecteurs 34 


points femelles qui seront mon¬ 
tés à chaque extrémité d'un câble 
plat 34 conducteurs. On montera 
de ce fait sur la carte série un 
connecteur 34 pistes mâle coudé 
(du même type que celui de 
l'ORIC). Une longueur maximale 
de 20 cm devrait suffire. 

Pour la liaison carte série/Minitel, 
on pourra tout simplement utili¬ 
ser un cordon DIN 5 broches du 
type de ceux utilisés en HIFI, ou 
le câbler à l'aide de deux DIN 5 
broches mâles et d'un câble 5 
conducteurs. On montera, côté 
carte, une DIN 5 broches femelle. 


Pour vous 
faire patienter 

Ce petit programme vous per¬ 
mettra d'écrire sur l'écran du 
Minitel, à l'aide du clavier de 
votre ORIC. La plupart des 
commandes habituelles de l'ORIC 
sont disponibles comme CTRL-L, 
CTRL-Q et même CTRL-G I La 
touche DEL affichera un pavé 
blanc et CTRL-C vous permettra 
de sortir du programme. 

Bien sûr, beaucoup d'autres cho¬ 
ses sont faisables avec ce mini¬ 
éditeur, à vous de les découvrir 
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10 REM MINI EDITEUR 
20 : 

30 POKE#381,#00:REM RESET PROGRAMME 

AO PÛKE»382,#6B:REM PARITE PAIE, DTR VALIDE, IRQ INVALIDE. RTS=0 
50 POKE#383,#38:REM 1200 BDS, 7 BITS, 1 BIT STOP, HORLOGE INTERNE 
60 : 

70 GETA$:A=ASC(A$) 

80 IF A=03 THEN END 
90 POKE#3SO,A:GOTÛ 70 


CIRCUIT /P1PRIP1E 
CÔTE Soudures 


Q: 

o 

V. 

4 ) 

> 


Figure 6 



Nomenclature : 

SEMI CONDUCTEURS : 

1 SY 6551 (Synertek) ou R 6551 (Rockwell) 
1 74LS138 
1 74LS14 ou 74LS04 

CONDENSATEURS 

1 chimique 10 à 22 /xF/16 à 25 V 
1 22 nF céramique 


DIVERS 

1 quartz 1,8432 MHz en boîtier MC 184 
1 connecteur mâle, 34 points coudé (Berg ou 3M) 

1 support 28 pattes tulipe 

2 prises DIN 5 broches mâles 

1 prise DIN 5 broches femelle châssis 

1,50 m de câble blindé deux conducteurs + masse 
20 cm de câble en nappe 34 conducteurs 

2 connecteurs femelles, 34 points à sertir (Berg ou 3M) 


v 
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en attendant la prochaine fois où NOTE : Cherchez du côté des 
nous parlerons plus longuement ESC... 
du Minitel par lui-même. 


R7W 82 FKÜ D7 D6 D5 D4 D3 D2 DI DO DSR DCD Vcc 



Vcc 

14 13 


12 11 10 


74LS14 




74LS266 


Vcc 

14 13 12 11 10 9 





A SUIVRE 












































LES PIEDS DANS LE PII 


Le listing du programme illustrant mon dernier article a été supprimé d'autorité, car je n'ai droit 
qu'à deux pages. Je vous le livre ce mois-ci... C'est dur d'avoir un rédacteur en chef qui cen¬ 
sure ! D'autre part, comme c'est Noël, pas de cours cette fois-ci ! 


5000 

AC *6 52 

152 DEÎUT 

JAP LIFT 


509* 

38 

212 

SEC 


5003 

AD 00 Af 

153 RETOUR 

LOA CTRL 


5095 

A5 00 

213 

IDA *00 


5004 

C9 02 

15* 

CHP *02 


5097 

E9 01 

2IA 

SBC Ml 

! PECRENENTE 

| 5008 

00 03 

155 

8* >1 


5099 

85 00 

215 

STA *00 

1 LA CASE 

500A 

AC 2F 55 

154 

JAP SUITE 


5098 

A5 01 

216 

LOA *01 

: ECRAN 

5000 

C V 00 

157 >1 

WP MO 


509D 

E9 00 

217 

SBC MO 


5008 

DO 03 

158 

ftf >1 


5098 

85 01 

218 

STA *01 


5011 

AC 47 51 

159 

JHP NCTRL 


5ÛA1 

18 

219 

CLC 


501» 

A9 07 

140 >1 

LOA M07 


50A2 

90 IA 

220 

BCC >2 


5014 

00 00 AF 

141 

STA L16 


50A* 

A9 04 

221 >1 

LDA M06 

î -> 1 

5019 

A9 04 

142 

LOA MO* 


50A4 

BD OE AF 

222 

STA COL 


5018 

8D OE AF 

143 

ST» COL 


50A9 

20 38 51 

223 

jsr ne 


501E 

20 38 51 

164 

JSR TTC 


50AC 

DO 03 

22A 

B* >1 


5021 

F0 42 

145 

BEO >1 


50AE 

AC 2F 55 

225 

JAP SUITE 


5023 

A9 00 

166 

LOA *00 


5081 

18 

226 >1 

ac 


5025 

8D 02 «8 

167 

sta cm 


5082 

A5 00 

227 

LDA *00 


5028 

80 01 AF 

168 

ST» C/GX 


508* 

69 01 

228 

ADC MOI 

;L*INCREMENT 

5028 

80 03 AF 

169 

ST* C/B 


E 




5028 

A9 28 

170 

LOA **0 


5084 

85 00 

229 

STA *00 


5030 

8D 0A AF 

171 

STA C/H 


5088 

A5 01 

230 

LDA *01 


5033 

A9 00 

172 

LOA *00 

i PLUS DE 

508A 

69 00 

231 

ADC **00 


5035 

80 00 AF 

173 

STA CTRL 

; CONTROLE 

50BC 

85 01 

232 

STA *01 


5038 

A9 04 

17A 

LOA MO* 

iSAUT ORIENT 

50BE 

A2 00 

233 >2 

LOI **00 


E’ 





50CO 

Al 00 

23A 

LDA (00, XI 

i CONTENU DE 

| 5U3A 

80 00 AF 

175 

STA LIG 


50C2 

C9 20 

235 

WP *32 

i LA CASE EC 

5030 

A9 05 

176 

LOA M05 


R 





5038 

00 0E AF 

177 

ST» COL 


50C* 

FO 1F 

234 

BE'J VDU 


i 50*2 

20 38 51 

178 

JSR TTC 


50C4 

C9 61 

237 

WP ’i' 


50*5 

F0 08 

179 

BEO >2 


50C8 

FO 10 

238 

BEO >1 


50*7 

A9 01 

180 

LOA *1 


50CA 

C9 65 

239 

WP V 


50*9 

80 01 AF 

181 

ST» C/GX 


500C 

00 06 

2*0 

BNE >2 


50* C 

18 

182 

CLC 


50CE 

20 AA 53 

2A1 

JSR POINT 


50* D 

90 0F 

183 

BCC >3 


5001 

18 

2*2 

ac 


! 50*8 

A9 04 

18* >2 

LOA M04 


5002 

90 11 

2*3 

BCC VDU 


5051 

80 0E «F 

185 

STA COL 


50D* 

A9 01 

2A* >2 

LOA *«01 

;FLA6 DE NOS 

505* 

20 38 51 

186 

JSR TTC 


T 





5057 

F0 00 

187 

8EQ >5 


5006 

80 El BF 

2*5 

STA tBFEI 

;HIS A UN 

5059 

A9 01 

183 

LOA *1 


5009 

40 

246 

RTS 

505B 

80 02 AF 

189 

ST» C/D* 


5 ODA 

A5 02 

2*7 >1 

LDA *02 


505E 

A9 00 

190 >3 

LOA *00 


500C 

85 00 

2*8 

STA *00 


5060 

80 05 AF 

191 

STA TOUR 


500C 

A5 03 

2*9 

LDA *03 


5043 

AC 47 51 

192 

JAP NCTRL 


50E0 

85 01 

250 

STA *01 


5044 

A9 07 

193 >5 

LÜA MO 7 


50E2 

AC 2F 55 

251 

JAP SUITE 


5048 

80 00 AF 

19* 

STA LIG 


50E5 

A9 20 

252 VDU 

LOA «32 

! EFFACE 

5048 

A9 05 

195 

LOA M05 


50E7 

A2 00 

253 

LDI *00 

i L'ANCIENNE 

5040 

80 0E AF 

196 

STA COL 


50E9 

81 02 

25* 

STA (02.X) 

i POSITION 

5070 

20 38 51 

197 

jsr ne 


5ÛE8 

A5 00 

255 

LDA *00 


5073 

D0 08 

198 

B(€ ,6 


50ED 

85 02 

25o 

STA *02 


5075 

A9 01 

199 

LOA *01 


50EF 

A5 01 

257 

LDA *01 


5077 

80 00 AF 

200 

STA CTRL 


50F1 

85 03 

258 

STA *03 


507» 

18 

201 

CLC 


50F3 

18 

259 

CLC 

; PREPARE 

5078 

90 08 

202 

ICC >1 


LES 





5070 

A9 FA 

203 >6 

LDA MF» 


50F. 

A5 02 

240 

LOA *02 

s COORDONNEES 

5078 

80 05 *8 

20* 

STA TOUR 


5QF6 

49 28 

261 

AOC 1*0 

iPOUI LE TES 

5082 

AC 47 51 

205 

JAP NCTRL 


T 




5085 

A9 0A 

206 >1 

LDA MO* 

;SAISIE CAR» 

50F8 

85 02 

262 

STA *02 

JOE LA CASE 

CT 





DU 





5067 

80 0D *F 

207 

STA LIG 


50FA 

A5 03 

263 

LDA *03 

(DESSOUS 

5 OSA 

A9 05 

208 

LOA **05 

J <- 7 

50FC 

69 00 

26» 

AOC *00 


508C 

80 0E AF 

209 

STA COL 


50FE 

95' 03 • 

265 

STA *03 


5068 

20 3! 5! 

210 

JSR TTC 


5100 

Al 02 

264 

LOA («02,XI 


5092 

F0 10 

211 

BEO >1 
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5102 

CT 

61 

267 

CAP 'A’ 


5131 




29* | TEST 

TOUOC I PEBtT APPUI 

510* 

00 

03 

268 

1NE >1 


5131 




295 J S1AUITAIC SU* « TCUOCS 

510e 

*C 

2A 51 

269 

JAP >2 


5131 




296 | 



5109 


20 

270 >1 

CAP 132 


5131 




297 



5101 

FO 

0* 

271 

1£Q >3 


5131 

A£ 

OE 

4F 

298 TTC 

LOI 

COL 

5100 

C9 

65 

272 

CAP V 


513E 

A9 

FF 


299 

LOA 

MFF 

510F 

DO 

19 

273 

m >2 


51A0 

is 



300 

ac 


5111 

A9 

00 

27A >3 

LOA MO 


5IA1 

2* 



XI >1 

SOL 

A 

5113 

80 

00 *f 

275 

sta an 


51A2 

CA 



302 

DEI 


5116 

SD 

01 AF 

276 

STA C/61 


5 1 A3 

10 

FC 


303 

m 

<i 

5119 

m 

04 4F 

277 

STA C/H 


51A5 

AA 



30* 

T AI 


51 IC 

80 

02 AF 

27B 

STA C/DI 


51*6 

A9 

OE 


305 

LOA 

ttOE 

511F 

A9 

29 

279 

LOA ««0 


51*8 

AC 

F9 

FF 

306 

L0Y 

«FFF9 

5121 

BD 

03 AF 

280 

STA C/l 


51*1 

CT- 

01 


X7 

CPT 

Ml 

512* 

A9 

00 

281 

LOA MO 


51 AD 

M 

06 


308 

B* 

>1 

5126 

8D 

00 AF 

282 

sta ctb. 

î PLUS DE CT 

51*F 

20 

90 

F5 

3C9 

JS* 

«F590 

(*. 






5I$2 

18 



310 

ac 


5129 

EA 


283 VDU. 

HOP 


5153 

n 

03 


311 

ICC 

>2 

512A 

AS 

00 

28A >2 

LOA «00 


5155 

20 

35 

F5 

312 >1 

JS* 

«F535 

512C 

85 

02 

285 

STA «02 


5158 

AD 

00 

AF 

313 >2 

LOA 

L16 

512£ 

AS 

01 

286 

LOA «01 


5151 

62 

00 

03 

31A 

STA 

«300 

5130 

85 

03 

287 

STA «03 


515E 

A° 

08 


315 

LOA 

MX 

5132 

A2 

oo 

288 

LOI «00 


5160 

a 

X 

X 

316 

AND 

•300 

513* 

A9 

6* 

289 

LOA ’d' 


5163 

FA 



317 

HOP 


5136 

81 

02 

290 

STA (02,11 


516* 

EA 



318 

HOP 


5138 

AC 

2F 55 

291 

JAP SUITE 


5165 

EA 



319 

N0P 


5131 



292 ; HHmHIMHHtfMHUfHU 


5166 

t/1 



320 

STS 


5131 



2V3 | 











Le moteur o 


temps. 

Gérard FLAMMt | 


t ous /os utilisateurs d'une automobile ne 
sont pas forcément des mécaniciens, loin 
s'en faut, mais beaucoup sont curieux de 
savoir “comment ça marche Le programme pro¬ 
posé par Gérard FLAMME vous présentera, sur 
l'écran, le principe de fonctionnement du moteur 
i 4 temps. 

Utilisable sur ORIC-1, bien qu'ayant été écrit sur 
A TMOS, il suffire de faire la modification suivante 
pour l'adapter. 

Ligne 150, changer POKE # 27E,28 par POKE 

# 26F, 28. 



MOTEUR A 4 TEMPS « 

tt 

G. FLAMft « 


10 REM 

20 REM HHHHfHHHHIHHHH 

30 REM « « 

40 REM *♦ 

50 REM « 

60 REM ♦♦ 

70 REM « 

80 REM 
90 REM 

100 DOKE#1B,#F42D:P0KE618,2:P0KE48035,0 
110 TEXT : as : 0=0 :T=0: RESTORE :A=0 ;J=0 
120 GOSUB2O50 

130 PA=21sEN=19:AD=20:GA=16 
140 HIRES:PAPERPA-16: lMfl<EN—16 
150 P0KEI27E.28 

160 CURSET114,43,0:DRAWO, 13,1 :Cl)RSET107,49,0:DRAW0,7,1 
170 CURSET96,57,0:FILL3,1,EN 
180 CURSET150,57,0:FILL3,1,PA 


50 
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ARCADIE : INFERNO et VICKY le Jardinier 

Voici deux nouveaux jeux d'ancade de qualité poun Onic et Atmos : Gnaphismes, sons et vitesse 
sensationnels. 

Poun complètes te tableau - c'est le cai de le dine - Infenno voua pnopose un vénitable 
éditeun penmettant de modifien le jeu à votne convenance. 


TORTUE LOGIC 

8 aie sun la idées essentielles du LOGO, TORTUE LOGIC at un nouveau langage poun votne micno- 
ondinateun penmettant la cnlaiion gnaphique et musicale ivoluée et 1‘apprentissage de ta 
programmation poun les enfants. 

Comme en LOGO, TORTUE LOGIC met à votne disposition 44 "pnimitives" vous penmettant de cnien 
vos pnopnes "pnocldunes", de les exécuten, tes éditen, les sauveganden. Musiques et dessins 
cnéis peuvent être utilisés dans d’autna pnognammes. 


ATLANTIS 

Un gnand _ jeu d'aventune gnaphique et sous-manin. Vous aunez baoin de toute votne 
intelligence, d‘ingéniosité, d'astuces, et d'un bon scaphandne poun pantin à la découvente et 
nésoudne l’énigme de l'Atlantide. 

Mille dangens vous guettenont dans cette nechenche d'Atlantis, la cité légendaine engloutie ! 
Si vous néussissez, vous trouverez, peut-étne, nichesse, gloine et libenté. 


MOTS CROISES 

Ce logiciel poun le moins oniginal vous pnopose de nésoudne 120 gnilles de mots cnoisis ! 

Ve plus il componte un pnognamme d’assistance à la cnéation vous penmettant de cnéen, vous- 
même da gnilles et de les sauveganden. 

Le jeu componte deux niveaux de difficultés : avec ou sans les cases naines. 


FORMULE 1 

Ecnit 100 ! en langage machine, voici un nouveau jeu d'action : un supenbe logiciel de coun- 
se automobile en 3 dimensions. Paysage défilant, vision 3 dimensions, animation sonone, 31 
niveaux de jeu, dépendant du cincuit, de la vitesse moyenne imposée, nombne d’adversaires. 
Rien ne manque i ce logiciel exceptionnel qui vient renouveler la gamme de jeu poun Onic. 


Pour recevoir le nouveau catalogue COBRA SOFT, écrivez en 
joignant 2 timbres à COBRA SOFT B.P. 155 71104 CHALON S/S 
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_coin jasmin__ 

REDEFNITION 

—IASYTEXT 


L a Société TRAN commer¬ 
cialise depuis un an le trai¬ 
tement de texte EASY- 
TEXT pour ORIC-1/ATMOS et 
lecteur JASMIN. Il était déjà le 
thème de plusieurs articles parus 
dans THEORIC qui avaient pour 
but de compléter la notice accom¬ 
pagnatrice quelque peu succincte. 
Nous voulons ici éclairer la pos¬ 
sibilité de redéfinir le second jeu 
de caractères afin de créer et 
d'imprimer des textes techniques 
ou en langue étrangère. A ce pro¬ 
pos, nous proposons un petit pro¬ 
gramme qui affiche les caractè¬ 
res spéciaux d'EASYTEXT logés 
à partir de l'adresse # B800 en 
mode TEXT (#9C00 en mode 
HIRES) et aide à les modifier (voir 
figure 1 ). Si vous passez en mode 
graphique par CTR [ et disposez 
d'une imprimante capable de 
'livrer une recopie d'écran, vous 
pouvez imprimer tous les carac¬ 
tères spéciaux préalablement 
définis. 

Pour créer un nouveau jeu de 
caractères, vous procédez ainsi : 
— Tapez le programme proposé 
et sauvegardez-le sur disquette 
sous le nom CARSPEC. 

— Introduisez la disquette EASY- 
TEXT et démarrez le système. 
Vous disposez alors du deuxième 
jeu de caractères d'EASYTEXT 
comprenant . les caractères à 
accent et étrangers. 

— Passez sous TDOS par CTR C. 
— Chargez et exécutez le pro¬ 
gramme CARSET. Vous verrez 
les caractères spéciaux d'EASY¬ 
TEXT affichés à l'écran et numé¬ 
rotés de zéro à 79. Nous écartons 
les caractères semi-graphiques 
qui ne sont pas directement 


Wolfram LUTHER 
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coin jasmin. 



modifiables. Leurs données sont 
conservées à partir de l'adresse 
#2A4B et seront toutes les fois 
transférées dans la zone mémoire 
du deuxième jeu (les 8 configu¬ 
rations binaires définissant le 
caractère n° NN se trouvent à 
l'adresse #9COO + NN*8+ 1,1 = 
0,Bit 0 à 5 est utilisé, le bit 
6 doit être à 1 pour ne pas per¬ 
turber le mode HIRES. En les ran¬ 
geant l'une en-dessous de l'autre, 
l'ordinateur crée le caractère à 
l'écran). 

— Le numéro du caractère à 
redéfinir vous sera demandé. Evi¬ 
tez les lettres pourvues d'accents 
qui sont nécessaires pour le 
texte, les numéros 72 et 73 (ESC 
H et ESC I) (vous modifiez autre¬ 
ment les touches SPC et DEL) et 
éventuellement les cases vides 
74 à 78 qui décident sur la cou¬ 
leur d'encre. 

— Créez vos caractères spéciaux 
selon les situations. La figure 2 
vous montre un jeu pour les 
besoins d'un mathématicien, 
figure 3 un extrait de texte, si 
vous préférez les caractères rus¬ 
ses, à vous de jouer... 

— Stockez le ou les caractères 
modifiés. 

— Affichez le nouveau jeu pour 
un contrôle. 

— Sauvegardez-le sous un nom. 
Par exemple JEUCAR. Vous 
retrouvez le fichier sur la dis¬ 
quette sous le nom JEU- 
CAR.TXT. 


— Redessinez le plan du clavier 
(voir annexe 1 de la notice EASY- 
TEXT Touche ESC +... ). 

Vous voulez taper votre premier 
texte en russe ? Démarrez donc 
la disquette EASYTEXT, passez 
sous TDOS par CTR C, chargez 


votre nouveau jeu par : 

!LO AD''JEUCAR.TXT",, 
lancez un 

RUN 

et servez-vous du nouveau cla¬ 
vier supplémentaire... 


1 CLS : REM DEUXIEME JEU DE CRRRCTERE POU 
R ERSYTEXT 

10 PRINT"VOULEZ-VOUS CHARGER UN JEU DE 
CflRfiCTERES<0/N>"; * INRIJT AN*:IF fiU*-"N"TH 
EN30 

20 PRINT"DONNEZ LE NOM DU FICHIER"; : INR 
UT N*:N*=N*+".TXT"=! LORD N* 

30 HIRES=INK6•S=0 =RD=#A000 AE=#9C00 E=1 
5 B0=5 REM B0<=5,AE=#9900-PREMI ER JEU 
4fi FORJ=0TOE•FORI=0TO7 
50 A=PEEK< RE+<J+S*16 >*8+1 > 

€0 POKE RD+2*<J+1>+40*I+640*S ,R 
70 NEXT NEXT 
80 S=S+1 

JO IF S<B0 THEN 40 
100 FOR J=0 TO BO-1 

îiô rerd’b* 

120 CURSET 204,16* J,3 
130 F0RI = 1 TO 5 CURMOV 6,0,3 ! CHAR RSCCM 
I D*< B$, I>>,0,1 : NEXT 
140 NEXT 

150 DATA 00-15,16-31,32-47,43-63,£4-79 
180 RESTORE 

190 POKE 26,96GX=34GY=120 


20Û CLS ; PAINT"CREATION D'UN CARACTERE : 
SPC- S POUR SORTIR" 

210 GET RW*:IF ASC<AU*>=83 THEN 400 
220 INRIJT "NUMERO DU CARACTERE A CHARGER 
", NN 

230 IF NN<0 OR NN>73 OR NN=72 OR NN=73 
THEN PING GOTO220 
240 CURSET12,112,3 FILL 88,38,64 
250 FORI=0TO7 A=FEEK<AE+8*NN+1 ) :P0KEAD+ 
3205+1*40,A NEXT 

260 FORI=0TO5 CURSETGX+6*I,GY,3 :DRAW0,6 
4,1 CURMOV1,-72,3:CHAR53-1,0,1:NEXT 
270 CURSET GY,GY,3=DRAW 0,64,1 
280 FORI=0T07:CURSETGX,GY+8*1,3=DRAW36, 
0,1 CURMOV-42,1,3=CHAP65+1,0,1 
290 A<I>=64 :NEXT CURSETGX,GY+64,3 = DRAW3 
6,0,1 

300 PRINTNN,:INPUT" CHANGER L'ETAT DE L 
A CASE EX: E3- s POUR SORTIR",CA* 

310 IF RSC<CA*>=83 THEN 400 
320 S=ASC<: LEFT**' CA*, 1 > >-65 : W=ASC< RIGHT* 
<CA*,1>>-48 

330 IF S<0ORS>7 ORW<0 OR W>5 THEN PING 
GOTO 300 
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340 X=GX+1 +< 5-N >*6 : Y=GY+1 +3*3 = F=FO I NT< X 
+3/Y+4)* CURSETX/Y >3 

350 IF P=-l THEN CHAR42,O,6• A<S>=R<S)-I 
MK 2*H ) = GOTO300 
360 CHAR 42,0,1=fl<S>=R<3>+2 A W 
37Û GOTO 300 

4O0 CL3=INFUT"STOCKER LE CARACTERE < O/N 
>" ; AU* 

410 IF RU*<>"0" THEN 430 
420 FOR 1=0 TO 7’PQKE AE+NN*3+I,A(I> : NE 
XT 

430 INFUT"UN AUTRE CARACTERE < O,'N )" > AU* 
440 IF AU*< >"N" THEN 200 
450 INFUT"AFFICHAGE DU JEU <O/N; AU* 
460 IF AU$<>"N" THEN 30 


470 INFUT"SAUVEGARDER LE JEU < O- N )"; AU* 
400 IF AU*< >"0" THEN 510 
430 INFUT"DONNEZ LE NOM DU FICHIER’";N* 
500 AF-AE+#1C00 AG=AF+BO*#80 : N*=N*+".TX 
T,AF,RG"=TEXT=!SAVE NS 
510 TEXT-PRINT" AU REVOIR.END 




ATMOS ET LES m\\\\\\\\\\\\\\\\\\mm\\\\\m\wy*i mT ucDi 

il REM LES BUGS DE L'ATMOS SUITE ... 

,20 REM II ne faut Pas se fier aux aPParences 
ISO REM Faites Marcher ce Petit Pro9ramme et 
40 REM regardez attentivement les résultats 
50 REM des calculs R+2~ I -2* I =fl=A7.=i ntt fl ) 

60 REM Le remede? Remplacez Z' I Par INTt 2'I> 

90 M=64 

100 fl=M• PRINT"fl="jfl 
110 FOR 1=0 TO 3 

120 ft=fl+2''I = fl‘.=fl FRINTI; "fl+2 y ' M ; I ifl • fCii INT< fl ) 

130 A=A-2^ I ^ ftX=A = PR I NT I ; " fl ■ “ > fl ; flX ; I NT( fl ) 

140 NEXT 

150 PRINT"fl="; fl; PRINT”,R="jM;"VRAI OU FAUX?"; 

160 IFt fl=M >=0THENRRINT" FAUX"ELSEPRINT" VRAI" 

170 NAIT2000 PRINT M=2*M IFM< 1024THEN 100 

ISO PRINT"Etonnant, hein?" Qu , en pensez . V ous ? 


Jean-Claude CATHERINE 
61 - MOULINS-LA MARCHE 


La ROM de l'ORIC-1 contenait de 
nombreux bugs, corrigés pour ta 
plupart dans la version A TMOS. 
Cette dernière en possède au 
moins un (en dehors du ERRORS 
FOUND), assez énorme et pour¬ 
tant, à ma connaissance, per¬ 
sonne ne semble l'avoir remar¬ 
qué. 

Un de mes amis, possesseur 
d‘ATMOS, programmant en 
Basic depuis plus d’un an, a été 
stupéfait par ma découverte. 
Voici . 


TAPEZ LE PROGRAMME SUI¬ 
VANT : 

10 A = 0 

20 IF= O THEN PING ELSE PRINT 
"Message 1 ”: PRINT "Message 
2 " 

30 END 
RUN 

Vous entendez PING : c'est nor¬ 
mal. Ce qui l'est moins, c'est 
qu'apparaît sur l’écran : Message 
2 . 

Eh non, vous ne rêvez pas. Il 
semble que lorsque la condition 
après IF est vraie, et s'il n'y a pas 
de branchement avant le ELSE, le 
programme continue non pas à la 
ligne suivante comme prévu, 


mais à la deuxième instruction 
après le ELSE, ce qui est particu¬ 
lièrement vicieux. 

Il me semble, après avoir lu l'ex¬ 
cellent ouvrage de M. CHENIERE 
"Manuel de référence”, que l'er¬ 
reur se situe dans la ROM à 
l'adresse 9C3C où l'on trouve un 
JSR AD DO N2 qui positionne 
TXTPTR en fin d'instruction, 
alors que ce devrait être plutôt 
.JSR REM. 

En effet, si la condition après IF 
est vraie, le ELSE doit alors être 
considéré par le programme en 
REM. Mais j'avoue que je n 'ai pas 
approfondi la question et je ne 
suis pas sûr du tout de mes 
déductions. 

En toute état de cause, quelle 
leçon à tirer de tout ceci ? 

— Ou bien vous ne mettez 
qu'une instruction derrière un 
ELSE, et tout ira toujours très 
bien, 

— ou bien vous mettez plusieurs 
instructions derrière le ELSE : 
dans ce cas, assurez-vous que 
l’instruction prédédant le ELSE 
est une instruction de branche¬ 
ment ou d’arrêt (GOTO, GOSUB, 
RETURN, END ou STOP), sinon 
vous risquez quelques surprises... 
Tous les A TMOS que je connais 
ont ce problème, mais peut-être 
y a-t-il d'autres version de la ROM 
comme le suggérait THEORIC 
dans son n° 3 page 19. 

Il serait peut-être intéressant que 
les lecteurs de THEORIC fassent 
part de leurs expériences et de 
leurs avis quant à la source de 
l'erreur : je n'ai fourni qu'une 
hypothèse... 

UNE DERNIERE REMARQUE : 
Les ORIC-1 que je connais n'ont 
pas de bug à ce niveau / 
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VISMO FAIT CONFIANCE A EUREKA 


DES ENSEMBLES "PRETS A BRANCHER" | 


Ensemble n° 1 monochrome comprenant 

- ORIC ATMOS unité centrale 
Magnétophone à cassettes 
Moniteur Monochrome 12" HR 

L'ensemble :. 

Ensemble n° 2 couleurs comprenant 

- ORIC ATMOS unité centrale 

- Magnétophone à cassettes 

- Moniteur couleurs spécial OR 14 

L'ensemble :. 


Ensemble n° 3 monochrome comprenant 
- ORIC ATMOS unité centrale 
Moniteur monochrome 12" HR 
MICRODISC ORIC Complet 
Disquette master SEDORIC 


Ensemble n° 4 couleurs comprenant : 
ORIC ATMOS unité centrale 
Moniteur couleurs spécial OR 14 
MICRODISC ORIC complet 
- Disquette master SEDORIC 


Lecteur 3“ ORIC MICRODISC 

avec DOS SEDORIC et controleur 1785 2490 





V. 


y 


Périphériques et Accessoires : 


Moniteur couleurs spécial OR 14 

2750 F 

Imprimante MCP 40 plotter 4 couleurs 

990 F 

Moniteur monochrome vert HR 12" 

1150 F 

Céble pour impnmante paiaiieie 

150 F 

Cable pour moniteur monochrome 

90F 

Rouleau de papier de rechange pour impr 

18 F 

Modulateur Noir & Blanc UHF 

295 F 

Jeu de stylos de rechange 

40F 

Modulateur couleurs UHF 

495 F 

Interface pour joystick programmable 

350 F 

Magnétophone a cassettes 

350F 

Joystick type Qucksbot 1" 

95F 


Kit ORIC 1 —» ATMOS : disponible ! 


Ce Kit permet aux possesseurs d'ORIC 1 de transformer leur 
ordinateur partiellement (clavier seulement) ou totalement 
(clavier + ROM) en ATMOS La transformation ne demande 
aucune soudure ni outillage spécial. Le kit comprend 
Un boîtier ATMOS complet avec clavier 
mécanique, une ROM 1.1 ATMOS. un 
connecteur de clavier, un manuel ATMOS 
et un emballage d'origine complet. 


Alimentation ORIC. 150 

SEDORIC ? génial ! 490,00 FRS 


V_/ 


Moniteurs 


MCI4 : 2750 F. 

OR14 : 2750 F. 

HR14 : 3600 F. 

Compatibilité directe : 

MC14 : APPLE II avec carte RVB. APPLE 2C. ATARI Pal. Com¬ 
modore 64 et VIC 20. DRAGON. EXCELVISION. HECTOR. 
LASER 3000. SPECTRUM. THOMSON T07 et M05. MSX et tous 
les ordinateurs disposant d'une sortie sur prise PERITEL. 

HR14 : APPLE avec carte HR. IBM PC et compatibles. SINCLAIR 
QL et les ordinateurs haute résolution possédant une sortie sur prise 
PERITEL. 

OR14 : ORIC 1 ET ORIC ATMOS 


Interface 

Entrée 

Sortie 

Prix 

P6010 

Peritel 

UHF Couleurs 

495 F. 

P6015 

Peritel 

Vidéo Secam 

UHF Noir et Blanc 

UHF Couleurs 

295 F. 

P6020 

Vidéo PAL 

Peritel 

495 F. 

P6030 

Vidéo PAL 

Vidéo Secam 

790 F. 


\_ J 




Logiciel 'Dangereusement Votre' 


1501 

«mi 

Nouveau lecteur de disquette 3", 
double têtes, double faces 
500 K‘octets 


(cassette) et 200 F (disquette) 


JASMIN EASYTEXT 

590 F 

JASMIN MULTI-FICH 

590 F 

ASSEMBLEUR 

490 F 

MATHEGRAPH3 D 

390 F 

JASMIN-CALC 

590 F 


ORIGRAPH 

350 F 

LE REBELLE 

219 F 

LES CONQUERANTS 

219 F 

LOGO-GRAPH 

390 F 


LOGICIELS LORICIEL 
VORTEX 270,00 Frs 

LOGO VI 295,00 Frs 

RAPPRENDS L ANGLAIS 
160,00 Frs 

3D FONGUS 100,00 Frs 

LE SECRET DU TOMBEAU 
150,00 Frs 


directement adressables 

sans retourner la disquette 

LA PUISSANCE NOUVELLE 
POUR ORIC 1 ET ATMOS 

2890,00 Frs 


Tél.43.38.60.00 


AIGLE D'OR 
JIMMY PUB 
STAR 



Vente Informations Services Micro-Ordinateurs 

*?Hic , ia-<xïctLH4,teur4 garnit taux 

M, bd Btamirchil» - 78011 Pari* 

Métro Bastide ou Chemin Vert 
De 10 h à 20 h g&uf dimanche et lundi 


180,00 Frs 
130,00 Frs 
130,00 Frs 

















































PETITES ANNONCES 


La plaça réservés aux patitas annonces ast 
limitée. En conséquence, celles-ci passent 
dons leur ordre d'arrivée Per contre, les peti¬ 
tes ennonces farfelues sont systématique 
ment rejetées. .. De même, comme il est peu 
probable qu’il exista des "généreux dona¬ 
teurs" de matériels ou de logiciels, les peti¬ 
tes annonces faisant appel é ces philantro- 
pes ne seront insérées que si la place libre 
le permet. 

Seront refusées toutes les annonces visant 
è vendre ou échanger des listes ou copies de 
logiciels non garantit "d'origine”, ainsi que 
toute annonce incitant au piratage. 

En conséquence, réfléchissez bien avant 
d’envoyer vos textes. 

Les petites annonces doivent impérativement 
nous parvenir sur la grille (découpée ou pho¬ 
tocopiée). le texte étant rédigé é raison d'un 
caractère par case. 

Enfin, toute annonce non accompagnée de 
timbres ne sera pas insérée 


Vends Jasmin + disquettes (150 logiciels), prix à 
débattre. Demander Jérôme au 48 74 49.86 

Vends ATMOS + magnéto K7 Philips D6620 + 17 
K7 (Aigle d’or, etc.) entre 2000 et 3000 F à débat 
tre. Tél.: (Il 45 74 51 33. 

Vends CBS + DKey-Kong : 500 F. Zaxxon : 150 F. 
Interf. + poignée ORIC : 200 F. Stylo optique : 
250 F. Tél 78.32.62.43 après 19 h Cherche Rom 
ORIC. 

Achète THEORIC numéro 5. Tél.: (Il 43.76.51.33 
ou écrire M. RIBATTO, 11 rue du 18 juin 1940. 
94700 MAISONS ALFORT. 

Vends cartouches CBS-COL Ecovision : Looping, 
Donkey-Kong. Venture et 2 cartouches Vidéopec 
n° 12 et n' 30 : 120 F. Tél.: 64 57.05.35 

Vends cassettes ORIC'ATMOS Zorgon : 80 F. 
Ultra : 50 F, Elektro-Storm : 50 F. Super-Jeep : 
90 F. Adapter Joystick 11) : 90 F. Trésor du Pirate : 


80 F Hubert : 90 F. Interface manettes : 130 F. 
Tél 64.57 05.35. 

Vends ORIC 1 48 k + cordons + prise Péritel + 
leçons Basic + moniteur + si besoin RTTY, CW, 
SSTV. le tout sur cassettes 1200 F. Tél : 
56.62.00.62 

Vends ORIC-1 48 k + Peritel + cordon alim + 
manuels divers Le tout tbe Tél : 34.64.42.68 le 
soir. 42 65.92.25 le jour. 

Vends ATMOS 48 k 110/841 complet Peritel + 
magnéto + livres ♦ logiciels : 1200 F Joël LERE 
NARD. 22 rue de La Ruée. 35230 ST ERBLON 

Vends ATMOS + microdisc + 18 disquettes pro¬ 
grammes * révisés : 3000 F. Tél : 48 39 20.86 
Marc JULIEN. 90 rue A. Karman. 93300 ANBER 
VILLIERS 

Vends ORIC ATMOS + Peritel + livres + nbx 
progs., tbe 1800F. G. GUILLEMIN. 2 rue des Fos¬ 
ses. 56800 Ploermel, tél.: 97.74.03.12 (le soir). 

Vends ORIC-1 + p. Peritel + 20 K7 pgm + lec 
teur K7 + MCP 40 4 couleurs + 12 K7 jeux. Prix 
è débattre : 3200 F. Tél.: (Il 64.21.20.54. 

Vends ATMOS + lect. cass. + 150 logiciels + 
livres + revues : 2000 F. Rodolphe MOSCA. 69 
b. de la Fraternité, 44600 SAINT NAZAIRE. tél.: 
40.22.25.57. 

Vends ATMOS + disq. +■ synth. voc. + interf. pro- 
gram + joystick *■ 100 pgs * doc. » magnéto. 
Oaniel FAFUR, 77 av. de la Croix Rouge. 13013 
MARSEILLE 

Vends ATMOS 48 k + 100 jeux + magnéto + 
cébles + livres - interface joystick : le tout : 
2100 F. M GASTALY Renaud, tél : 201 02.32 
après 18 h. 

Vends ORIC ATMOS + JASMIN 2 + MCP 40 + 
interface joystick programmable + 200 logiciels. 
Possibilité vente séparée. Thierry HOUZE. tél 
20.35.59.65. 

Vends ORIC ATMOS + ROM ORIC-1 + lecteur 5 
pouces double tête + TDOS Jamsm 2 + 10 dis¬ 
quettes pleines : 5000F. Tél : III 34.87.12.79 (le 
soir). 


Vends ORIC-ATMOS (complet) + impri¬ 
mante GP 500A (garantie) + magnétophone 
-t- manuels -t- livres -F 18 logiciels (liste sur 
demande). Prix d’achat 06/84 : 11 000 F. 
Prix de vente : 6000 F. Stéphane DUBOIS, 
38 bd des Iles d’Or. 13009 MARSEILLE, tél.. 
91.41.39.67. 

Vends ORIC-1 parfait état t. mod. N et B 
incorporé -t- péritel : 600 F. Paul MILLIOT, 
25 rue des Perrières, 18000 BOURGES. 

Vends ORIC-1 ROM ORIC-1/ATMOS + 
magnétocassette + progs. récents + inter¬ 
face manette + Eprom ATMOS : 1 200 F. 
Nicolas, tél.: 64.38.64.09. 

Cherche ORIC-1 ou ATMOS pour pièces et 
logiciels RTTY. Faire offre. R. BARBELIN. 24 
Bd. d’Alsace, 57070 METZ, tél.: 
87.74.10.58. 

Vends logiciels ATMOS au choix. Ultra-Light, 
Cycle-Scuba, Dive-Defence. Force, Marc, 
Orion, Elektro Storm, Super Jeep. Tél.: 
84.21.69.83. 

Urgent vends ATMOS + Jasmin avec env. 
200 progs. et nb. livres et revues (THEORIC. 
etc.) : 4900 F. Tél.: 64.00.86.70. 

Vends Jasmin (09/84 TBE) + disquettes + 
manuel : 2490 F. Moniteur couleur 36 cm 
Péritel : 2490 F. C. COUVIDA, tél.: 
69.21.29.66. 

Echange programmes ORIC-1/ATMOS sur 
cassette (Tria, etc.). Envoyer liste ô Jean 
Marc BALLY, 8. rue Buibouzoc. 03800 CAN¬ 
NAT. 

Vends ATMOS + moniteur + magnéto + 
K7 + Péritel + cordons. P. MAZERAND, 46 
rue de la Haie des Leisses, 88150 THAOW, 
tél.: 29.39.45.49 


ANNONCEZ-VOUS! ! 

les petites annonces et les messages 



jo Coupon à renvoyer accompagné de 3 timbres à 2,20 F à : 

►I SORACOM, 10 Avenue du Général de Gaulle, 35170 BRUZ 
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0RIC Naturalisé Français ! 


Le premier juin 85, la Société EUREKA a racheté OR1C 
INTERNATIONAL, tous les droits, brevets et produits qui s'y 
rattachent, avec l'intention affirmée de continuer pour ORIC 
une carrière jusqu'ici triomphale, et d'en faire une marque 
française de premier plan Les ATMOS sont désormais assem 
blés dans son usine en Normandie, avec quelques modifica¬ 
tions spécifiques : l'alimentation de la prise Péritel est main 
tenant asurée par l'ordinateur, ce qui supprime un transfor 
mateur et un branchement supplémentaire Une équipe 
d'ingénieurs et de programmeurs a été constituée pour éla¬ 
borer tous les nouveaux produits “Hard" et “soft" que les uti¬ 
lisateurs pourront souhaiter. 


GARANTIE : un Réseau SAV 


Grâce à l’implantation d'un réseau de points de vente agréés 
ORIC. EUREKA assurera sur toute la France une présence 
commerciale importante, ainsi qu’un service près-vente digne 
de ce nom. 

Toutefois, ORIC profitera de sa position de constructeur pour 
effectuer toutes les opérations de maintenance en usine. Les 
utilisateurs seront ainsi assurés à toute intervention de rece¬ 
voir un ordinateur possédant les caractéristiques d'un appa- 
teil neuf. 

Toutefois, pour ne pas immobiliser un appareil en SAV. il 
sera procédé à des échanges de cartes dans les centres agréés. 


DES ENSEMBLES "PRETS A BRANCHER" 


J 


Version "Cassette" 


Ensemble n° 1 monochrome comprenant 

• ORIC ATMOS unité centrale 

• Magnétophone à cassettes 

: Moniteur Monochrome 12” HR 
L'ensemble :. 


Ensemble n° 2 couleurs comprenant 
■ ORIC ATMOS unité centrale 

- Magnétophone à cassettes 

- Moniteur couleurs spécial OR 14 
L'ensemble 


2290 

F 


0 



Les matériels ORIC sont en vente chez votre dis¬ 
tributeur habituel, dans les centre agréés ORIC et 
par correspondance en retournant le bon ci-contre à 


m 


39 Rue Victor Massé 
Tel. (1) 281 20 02 


75009. PARIS 
TLX 649 385 F 



Version "Disquette 


#/ 


Ensemble n° 3 monochrome comprenant 

- ORIC ATMOS unité centrale 
Moniteur monochrome 12” HR 
MICRODISC ORIC Complet 

- Disquette master SEDORIC 



Ensemble n° 4 couleurs comprenant 
ORIC ATMOS unité centrale 
Moniteur couleurs spécial OR 14 
MICRODISC ORIC complet 
- Disquette master SEDORIC 



La Micro-école 


Ville. 


I 


désire commander les maté¬ 
riels et logiciels suivants : 



Ci-joint mon réglement par 
























































Le jeu sur micro-ordinateur. 


3 jeux d’aventures-arcade à un rythme 
échevelé dont VOUS êtes l’acteur principal ! 


En vente chez votre distributeur habituel ou en retournant le bon ci- 
dessous à EUREKA INFORMATIQUE. 


Versions pour : CUMMUUUnt ((--UJ 

ORIC (C-D)-AMSTRAD (C-D)-SPECTRUM (C) 
au prix de : 150 F (cassette) 
200 F (disquette). 
En préparation : MSX (C) APPLE II (D) 
ENTERPRISE (C) 


ALBERT R. BROCCOLI Présenta 

ROGER MOORE 


dans l'œuvre de IAN RJ-.MIM. 


JAMES B01NID 007 


UANGEREUSEMENT 

_VÔTRE_ 


COPYRIGHT 
DANJAQ S.A 

ALL R1GHTS 
RESERVED 


Version française distribuée 
en exclusivité par : 



i 


Rue . 

Code . Ville 


Délire recevoir le jeu "DANGEREUSEMENT VOTRE 

pour l'ordinateur . 

sur cassette - disquette (rayer la mention inutile) 

ci joint mon règlement de . par . 

os 

ïa 

o 

t- 


I 































